Chương trình con và lập trình có cấu trúc

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Cam Giang

Cho 1 file input.txt chứa các số nguyên. Hãy viết chương trình xét xem file input.txt có bao nhiêu số nguyên và tổng giá trị của chúng ghi kết quả vào file output.txt

Nguyễn Lê Phước Thịnh
29 tháng 10 2019 lúc 17:54

uses crt;
const fi='input.txt';
fo='output.txt';
var f1,f2:text;
a:array[1..100]of integer;
dem,i,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
dem:=0;
while not eoln(f1) do
begin
inc(dem);
read(f1,a[dem]);
end;
writeln(f2,'so luong so nguyen co trong day la: ',dem);
{---------------tinh-tong------------------}
t:=0;
for i:=1 to dem do
t:=t+a[i];
writeln(f2,'tong gia tri cac so nguyen trong day la: ',t);
close(f1);
close(f2);
readln;
end.

Khách vãng lai đã xóa

Các câu hỏi tương tự
Mạnh Cường Đào Huỳnh
Xem chi tiết
Cam Giang
Xem chi tiết
Mai Linh
Xem chi tiết
Đặng Công
Xem chi tiết
Ecchi Long
Xem chi tiết
35.Nguyễn Anh Tú
Xem chi tiết
09 Lê Quang HIếu
Xem chi tiết
võ thị mỹ lệ
Xem chi tiết
27. Nguyễn Chí Thiện
Xem chi tiết