Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trần Hương Trà

Viết chương trình nhập dãy n số nguyên và in ra tổng các số có trong dãy vừa nhập.

Thế Thôi
24 tháng 4 2022 lúc 21:31

program b1;
uses crt;
var i,n: integer; a:array[1..100] of integer; s:longint;
begin
clrscr;
write('nhap vao so nguyen n :');
readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
s:=0;
for i:=1 to n do s:=s+a[i];
write('Tong cac so vua nhap=',s);
readln;
end.

sr trả lời hơi trễbucminh


Các câu hỏi tương tự
Trịnh Ngụ Quân
Xem chi tiết
Mai Phương Lê
Xem chi tiết
Phan Thu
Xem chi tiết
quangduy2107
Xem chi tiết
Ha Cam
Xem chi tiết
Đỗ Thị Minh Ngọc
Xem chi tiết
Hoàng Ngọc Hậu
Xem chi tiết
Bùi Ngọc Khánh Huyền
Xem chi tiết
Anh Đức 8/8
Xem chi tiết
minh đức
Xem chi tiết