Ôn tập cuối năm

TN
ML
13 tháng 4 2023 lúc 23:09

Program HOC24;

var i,n: integer;

t: longint;

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

begin

write('Nhap N: '); readln(n);

for i:=1 to n do 

begin

write('Nhap phan tu thu ',i,': '); readln(a[i]);

end;

t:=0;

for i:=1 to n do t:=t+a[i];

write('Tong la: ',t);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
TS
Xem chi tiết
LH
Xem chi tiết
LH
Xem chi tiết
H24
Xem chi tiết
LH
Xem chi tiết
TV
Xem chi tiết
H24
Xem chi tiết
LK
Xem chi tiết