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

Primary tabs

Submitted by Dennis80 on Wed, 05/18/2022 - 19:05

Напишите программу, которая выводит на экран ряд чисел с помощью цикла for:
1 5 9 13 17 21 25 29 33 37 41 45

var i, a : integer;

begin
  a := 1;
  for i := a to 12 do
    begin
      write(a, ' ');
      a := a + 4;
    end;
  readln();
end.