Lập trình đơn giản

NB

viết chương trình tính tống :S=1+2+3+...+n.Trong đó n là số nguyên nhập từ bàn phim

LD
19 tháng 4 2019 lúc 9:38

program tongs;

uses crt;

var n,S,i: integer;

begin

clrscr;

writeln('Nhap n = '); read(n);

S:=0;

for i:= 1 to n do

S:=S+i;

writeln('Tong S = ',S);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
CQ
Xem chi tiết
TL
Xem chi tiết
BD
Xem chi tiết
LH
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
NB
Xem chi tiết
NB
Xem chi tiết