HN

Viết chương trình tính tổng các số tự nhiên trong phạm vi từ 10 đến 99

Thông báo kết quả ra màn hình?

PV
28 tháng 2 2022 lúc 21:21

Program Tong_cac_so_tu_nhien;

Uses CRT;

Var i,d: Byte;

Begin

d:=0;

For i = 10 to 99 Do d:=d+i;

Writeln('Tong cac so tu nhien tu 10 den 99 la ',d);

End.

Bình luận (0)

Các câu hỏi tương tự
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
NH
Xem chi tiết
KN
Xem chi tiết
QN
Xem chi tiết
TN
Xem chi tiết
TH
Xem chi tiết
PN
Xem chi tiết