viết chương trình tính tổng của các số nguyên trong phạm vi từ 1 đến n, với n được nhập từ bàn phím
viết chương trình tính tổng của các số nguyên trong phạm vi từ 1 đến n, với n được nhập từ bàn phím
By Arianna
By Arianna
viết chương trình tính tổng của các số nguyên trong phạm vi từ 1 đến n, với n được nhập từ bàn phím
program Tong;
uses crt;
var n,i,T: integer;
Begin
clrscr;
write(‘Nhap n: ‘); readln(n);
for i:=1 to n do T:=T+i;
write(‘Tong cac so tu a den ‘,n,’ = ‘,T);
readln
End.
uses crt;
var n,i,s:longint;
begin
clrscr;
write(‘Nhap n: ‘); readln(n);
for i:=1 to n do inc(s,i);
writeln(‘Tong: ‘,s);
readln;
end.