Урок 12.2 Задача 2

Урок 12.2 Задача 2

Вспомогательная задача (сдавать не обязательно):
Напишите программу, которая выводит на экран ряд чисел с помощью цикла for:

1 5 9 11 15 19 23 27 31 35 39 43

Решение:

var i: integer;
begin
  for i := 1 to 44 do
    begin
      if((i mod 4) = 1) then
      write(i, ' ');
    end;
    readln();
end.

1 5 9 13 17 21 25 29 33 37 41
vedro-compota's picture

исправить форматирование, остальное нормально

_____________
матфак вгу и остальная классика =)

var i: integer;
begin
  for i := 1 to 44 do
    begin
      if((i mod 4) = 1) then
        write(i, ' ');
    end;
  readln();
end.