Bài 8. Lặp với số lần chưa biết trước

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Lương Gia Bảo

Viết chương trình in ra màn hình N số nguyên. Tính tổng của các số

Kiều Vũ Linh
14 tháng 3 2023 lúc 7:36

Var i,n,s:integer;

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

Begin

Write('N = ');readln(n);

For i:=1 to n do

Begin

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

s:=s+a[i];

End;

Writeln('Cac so vua nhap la ');

For i:=1 to n do

Write(a[i]:7);

Writeln;

Write('Tong la ',s);

Readln;

End.


Các câu hỏi tương tự
huỳnh duy cát
Xem chi tiết
An Vy
Xem chi tiết
Trần Thị Mai Ngọc
Xem chi tiết
Yết Thiên
Xem chi tiết
nguyễn thị như ý
Xem chi tiết
Mỹ Trinh
Xem chi tiết
HUY HUỲNH QUANG
Xem chi tiết
Yết Thiên
Xem chi tiết
Giap Nguyen Van
Xem chi tiết