Lập trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Tính tổng từ 1 đến 10 bằng lệnh lặp for......do.

Nguyễn Lê Phước Thịnh
14 tháng 5 2020 lúc 13:38

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 10 do

t:=t+i;

write(t);

readln;

end.


Các câu hỏi tương tự
Tuyết Lê
Xem chi tiết
Nga Huỳnh
Xem chi tiết
Tú Nguyễn
Xem chi tiết
Ma Phan Đức
Xem chi tiết
DCal146 anime
Xem chi tiết
Võ Châu Minh Ngọc
Xem chi tiết
Yến Nguyễn
Xem chi tiết
Đinh Thuận
Xem chi tiết
Le Bảo Thy
Xem chi tiết