Bài 9. Làm việc với dãy số

DM

Viết chương trình in ra các số chia hết cho 3 trong phạm vi 1-10

PG
20 tháng 4 2023 lúc 21:04

program SoChiaHetCho3;

var

     i: Integer;

begin

     writeln('Cac so chia het cho 3 trong doan tu 1 den 10 la:');

     for i := 1 to 10 do

     begin

          if i mod 3 = 0 then

               write(i, ' ');

     end;

end.

Bình luận (0)

Các câu hỏi tương tự
HD
Xem chi tiết
H24
Xem chi tiết
HQ
Xem chi tiết
LP
Xem chi tiết
TD
Xem chi tiết
HN
Xem chi tiết
AS
Xem chi tiết
LP
Xem chi tiết
T0
Xem chi tiết