Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Không Muốn Ghi Tên

tính tổng các số tự nhiên từ 100 đến 1000 (vòng lặp for do)

Nguyễn Lê Phước Thịnh
11 tháng 5 2021 lúc 20:47

uses crt;

var i:integer;

s:real;

begin

clrscr;

s:=0;

for i:=100 to 1000 do 

 s:=s+i;

writeln(s:0:0);

readln;

end.


Các câu hỏi tương tự
27. Nguyễn Mạnh Quyết 8A...
Xem chi tiết
Ph Anh
Xem chi tiết
Trí Cao
Xem chi tiết
Hùng Bùi
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
My Trà
Xem chi tiết
hà nhật ân
Xem chi tiết
Thảo Nguyễn
Xem chi tiết
Nguyễn Võ Phương Uyên
Xem chi tiết