Viết chương trình nhập vào N số nguyên từ bàn phím. Hãy tính à in ra màn hình tổng của các số vừa được nhập vào.
INPUT: 3 6 9 OUTPUT: Tong cac so nhap vao:18
Viết chương trình nhập vào N số nguyên từ bàn phím. Hãy tính à in ra màn hình tổng của các số vừa được nhập vào.
INPUT: 3 6 9 OUTPUT: Tong cac so nhap vao:18
Em tự làm bằng 2 bàn tay mong admin đừng xóa
uses crt;
var n,i,s:longint; a:array[1..1000000] of longint;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
read(a[i]);
inc(s,a[i]);
end;
writeln(‘Tong cac so nhap vao: ‘,s);
readln
end.