Một số khái niệm về lập trình và ngôn ngữ lập trình

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lục Quốc Bảo

Viết chương trình đọc dữ liệu trong tệp bài tập TXT được đặt trong ổ d đưa kết qua ra ngoài màn hình

Nguyễn Lê Phước Thịnh
12 tháng 10 2019 lúc 11:02

uses crt;

const fi='txt.inp';

var f1:text;

a:array[1..100]of integer;

dem,i:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

dem:=0;

while not eof(f1) do

begin

inc(dem);

read(f1,a[dem]);

end;

for i:=1 to dem do

write(a[i]:4);

close(f1);

readln;

end.


Các câu hỏi tương tự
Nguyễn trọng toàn
Xem chi tiết
Đỗ Đức Lâm
Xem chi tiết
Khánh Hằng Mai
Xem chi tiết
Duy Ng Văn
Xem chi tiết
Đặng Văn Sơn
Xem chi tiết
bui pham phuong Uyen
Xem chi tiết
Lục Hạ Vy
Xem chi tiết
phạm quốc cường
Xem chi tiết
Lê Cẩm Tú
Xem chi tiết