Bài 17: Chương trình con và phân loại

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Như Thuần Nguyễn Đặng

Cho 1 tệp dl.i nt gồm 2 dòng Dòng 1 lưu trữ 1 số nguyên N Dòng 2 lưu trữ N số nguyên Thực hiện đọc dữ kiệu từ tệp vào ctrình và tính tổng dòng 2 Mong thầy rep nhanh , e cảm ơn ạ

Nguyễn Lê Phước Thịnh
12 tháng 4 2021 lúc 21:53

Uses crt;

Const fi='dl.int'

Var f1:text;

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

I,n,t: integer;

Begin

Clrscr;

Assign(f1,fi); reset(f1);

Readln(f1,n);

For i:=1 to n do

Read(f1,a[i]);

T:=0;

For i:=1 to n do

T:=t+a[i];

Writeln(t);

Close(f1);

Readln;

End.


Các câu hỏi tương tự
Hậuu
Xem chi tiết
Nguyễn Văn Nhiên
Xem chi tiết
Phong
Xem chi tiết
Thảo Hồ
Xem chi tiết
Irist Nguyễn
Xem chi tiết
Đặng Thị Kiều Oanh
Xem chi tiết
Bảo Trâm
Xem chi tiết
Golem
Xem chi tiết
lê chí hiếu
Xem chi tiết