gia linh
Giới thiệu về bản thân
chào các bạn
0
0
0
0
0
0
0
2023-04-09 20:42:33
uses crt;
var s,i:integer;
begin
s:=0;
for i:=1 to 100 do s:=s+i;
write('Tong cac so tu 1 den 100 la: ',S);
readln;
end.