Viết chương trình tính tổng A=1+2+3+4+…+T với T là một số nguyên dương tùy ý do người dùng nhập vào từ bàn phím.
Viết chương trình tính tổng A=1+2+3+4+…+T với T là một số nguyên dương tùy ý do người dùng nhập vào từ bàn phím.
By Parker
By Parker
Viết chương trình tính tổng A=1+2+3+4+…+T với T là một số nguyên dương tùy ý do người dùng nhập vào từ bàn phím.
Program tinhtong;
Uses crt;
Var A, T, i: longint;
Begin
Clrscr;
Write(‘Nhap so nguyen duong T: ‘); readln(T);
A:=0
For i:=1 to T do A:=A+i;
Writeln(‘Tong A = ‘,A:0:2);
Readln
End.
program tong_A;
uses crt;
var a,t,i:integer;
begin
clrscr;
write(‘Nhap T: ‘); readln(t);
A:=0;
for i:=1 to t do
A:=A+i;
write(‘A= ‘,a);
readln;
end.