viết chương trình nhập vào số nguyên N. Tinh và hiển thị tổng các số tự nhiên từ 1 đến N
viết chương trình nhập vào số nguyên N. Tinh và hiển thị tổng các số tự nhiên từ 1 đến N
By Ximena
By Ximena
viết chương trình nhập vào số nguyên N. Tinh và hiển thị tổng các số tự nhiên từ 1 đến N
program bai_tap_1;
uses crt;
var n,s,i: integer;
begin
write (‘Tong n so la’);
readln (n);
For i := 1 to n do s := s+i ;
writeln (s);
readln;
end.
program tinhtong;
var i, N: integer;
S: longint;
begin
write (‘ nhap vao so N:’); readln(N);
S:= 0;
for i:= 1 to N do S:= S+i;
writeln (‘ tong cua’, N,’ la S=’, S);
readln
end.
chúc bạn học tốt nhaaaaa~