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

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

Вывести на экран все числа от 4 до 100 с шагом 4, т.е.:
4 8 12 16.......100
(при более оптимальном решении проверка через mod не потребуется)

begin
  i:=4;
  write(i, ' ');
  while(i<=100) do
   begin
    i:=i+4;
    write(i, ' ');
   end;
  writeln();
  writeln('<<konec>>');

  readln();

end.

Решение

4 8 12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84 88 92 96 100 104