Ly Huỳnh

Viết chương trình nhập dãy số A có n phần tử từ bàn phím, tính tổng các phần tử trong A

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

Program HOC24;

var i,n: integer;

t: longint;

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

begin

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

for i:=1 to n do 

begin

write('a[',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ự
Trường Nguyễn
Xem chi tiết
Lộc Nguyễn
Xem chi tiết
trần hiếu
Xem chi tiết
Toby Phạm
Xem chi tiết
Ngọc Nguyễn
Xem chi tiết
thuan_64
Xem chi tiết
tâm minh
Xem chi tiết
Ly Huỳnh
Xem chi tiết
Ske Bình
Xem chi tiết