Задача 11 Урок 11

Primary tabs

Submitted by exotick777 on Fri, 08/20/2021 - 22:34

Вывести на экран все числа от 4 до 100 с шагом 4.

var
  i:integer;
begin
  i:=0;
  while (i < 100) do
  begin
    i:=i+4;
    writeln(i,' ');
  end;
  readln();
end.