viết chương trình tính tổng của n số tự nhiên đầu tiên. với n là số nguyên được nhập từ bàn phím
viết chương trình tính tổng của n số tự nhiên đầu tiên. với n là số nguyên được nhập từ bàn phím
By Autumn
By Autumn
viết chương trình tính tổng của n số tự nhiên đầu tiên. với n là số nguyên được nhập từ bàn phím
uses crt;
var ,i,t: integer;
BEGIN
clrscr;
t:=0;
Write(‘Nhap vao : ‘); readln(n);
For i:=1 to n do
t:=t+i;
Writeln(‘Tong cac so tu nhien dau tien la : ‘,t);
readln;
END.
program phuongt;
uses crt;
var n, s, i: integer;
begin
clrscr;
write(‘Nhap n = ‘); readln(n);
s:=0;
for i:=1 to n do s:=s+i;
write(‘Tong = ‘, s);
readln
end.