Dùng câu lệnh lặp while do viết chương trình tính tổng 10 số tự nhiên đầu tiên. nhanh giúp mình nhaa 21/07/2021 Bởi Margaret Dùng câu lệnh lặp while do viết chương trình tính tổng 10 số tự nhiên đầu tiên. nhanh giúp mình nhaa
program tong; uses crt; var i,T: integer; Begin while i<=10 do begin T:=T+i; i:=i+1; end; write(‘T = ‘,T); readln End. Bình luận
program tong;
uses crt;
var i,T: integer;
Begin
while i<=10 do
begin
T:=T+i;
i:=i+1;
end;
write(‘T = ‘,T);
readln
End.