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

Nguyễn Quốc Bảo

Viết chương trình tính tổng các số chia hết cho 2 từ 1 đến 12

Nguyễn Lê Phước Thịnh
29 tháng 5 2022 lúc 13:11

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 12 do 

  if i mod 2=0 then t:=t+i;

writeln(t);

readln;

end.


Các câu hỏi tương tự
Ánh sao
Xem chi tiết
Chira Nguyên
Xem chi tiết
Linh lung
Xem chi tiết
Yết Thiên
Xem chi tiết
Mỹ Trinh
Xem chi tiết
Đào Tất Thắng
Xem chi tiết
kimizuki hoshimya
Xem chi tiết
Nguyễn Hưng
Xem chi tiết
phương thuý nguyễn thị
Xem chi tiết