Cho tệp bai1.txt gồm 8 dòng , mỗi dòng chứa 1 số nguyên . Viết ctrinh in 8 số đó ra trên cùng1 dòng . Giúp mình nhanh nhá votevaf tym
Cho tệp bai1.txt gồm 8 dòng , mỗi dòng chứa 1 số nguyên . Viết ctrinh in 8 số đó ra trên cùng1 dòng . Giúp mình nhanh nhá votevaf tym
program ideone;
var
a: array[1..8] of integer;
i: integer;
begin
for i:=1 to 8 do readln(a[i]);
for i:=1 to 8 do write(a[i], ” “);
end.
Anh tự thêm đóng mở file nha