Bài 7. Câu lênh lặp

Tiểu cường

Viết chương trình in ra tổng các số chẵn trong khoảng từ 10 đến 30( sử dụng for...do)

Kiều Vũ Linh
24 tháng 2 2022 lúc 7:03

Var i,s:integer;

Begin

For i:=10 to 30 do

If i mod 2 = 0 then s:=s+i;

Write('Tong la ',s);

Readln;

End.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Ngọc
Xem chi tiết
thanh mai
Xem chi tiết
Bảo Trâm
Xem chi tiết
Phan Thị Ka
Xem chi tiết
Nguyễn Đức Hòa
Xem chi tiết
Thư Uyên
Xem chi tiết
DinoDrang
Xem chi tiết
huy hoàng
Xem chi tiết
Huy Nguyễn
Xem chi tiết