Sự dụng câu lệnh lặp for…do,viết chương trình tính tổng các số tự nhiên từ 1 đến 100 12/08/2021 Bởi Sadie Sự dụng câu lệnh lặp for…do,viết chương trình tính tổng các số tự nhiên từ 1 đến 100
Uses crt;
Var i, S : integer;
Begin
S:=0;
For i:= 1 to 100 do
S:=S+ i;
Writeln(S);
End.
Đây ạ