Bài 8. Lặp với số lần chưa biết trước

Minh Ngọc

Hãy viết chương trình Pascal tính tổng của 100 số tự nhiên liên tiếp.

Yêu cầu: Viết 2 chương trình sử dụng 2 dạng câu lệnh for...do và while...do

Nguyễn Lê Phước Thịnh
11 tháng 3 2022 lúc 9:44

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

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

writeln(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
Thanh huyền
Xem chi tiết
Thu Tuyền
Xem chi tiết
Thu Tuyền
Xem chi tiết
Thanh huyền
Xem chi tiết
Ngọc Tú
Xem chi tiết
Ánh sao
Xem chi tiết
Nguyễn Hưng
Xem chi tiết
SuperMeo
Xem chi tiết