Ske Bình

viết chương trình nhập vào một danh sách số nguyên từ bàn phím. tính tổng các số nguyên trong danh sách

Minh Lệ
12 tháng 3 2023 lúc 21:46

Program HOC24;

var i,n: integer;

t: longint;

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

begin

write('Nhap so phan tu : '); readln(n);

for i:=1 to n do 

begin

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

end;

t:=0;

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

write('Ket qua la: ',t);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Eni Lin
Xem chi tiết
tâm minh
Xem chi tiết
Ngọc Nguyễn
Xem chi tiết
Nguyễn văn thanh
Xem chi tiết
Thu Hồng Trịnh
Xem chi tiết
Trường Nguyễn
Xem chi tiết
Trần Long
Xem chi tiết
nguyen vanh
Xem chi tiết
1. Ánh
Xem chi tiết