TC

viết chương trình nhập một số nguyên n tính S=1+2+3+...+n ( use for or while)

giúp t vss mai ktra rrr :(((

 

NT
9 tháng 2 2023 lúc 21:08

uses crt;

var i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do t:=t+i;

write(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
PT
Xem chi tiết
TN
Xem chi tiết
TP
Xem chi tiết
NN
Xem chi tiết
KH
Xem chi tiết
TT
Xem chi tiết
SF
Xem chi tiết
LM
Xem chi tiết
NT
Xem chi tiết
VN
Xem chi tiết