Задача 3 Урок 10.1

Задача 3 Урок 10.1:

Выведите на экран, все четные числа от 35 до 64.

Решение:

var i: integer;
begin
  for i:=35 to 64 do
    if ((i mod 2) = 0) then
     write(i, ' ');
  readln();
end.  

Консоль:
36 38 40 42 44 46 48 50 52 54 56 58 60 62 64