Bạn bè (0)
Hoạt động gần đây (1)
-
Trần Tân đã trả lời trong câu hỏi: Viết chương trình Pascal tính tổng N số tự nhiên đầu tiên sử dụng câu lệnh lặp với số lần chưa biết trước? Cách đây 5 năm
Program Tong;
uses crt;
var i,s:integer;
const n=100;
Begin
s:=0;
i:=1;
while i<=n do
Begin
s:=s+i;
i:=i+1
End;
writeln('Tong cac so la:',s)
End.