Задание 1 Урок 10.1

Задание 1 Урок 10.1:

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

var i: integer;
begin

  for i := 35 to 64 do
    if (i mod 2 = 1) then
        write(i, ' ');

  readln();
end.    

Консоль:

35 37 39 41 43 45 47 49 51 53 55 57 59 61 63