Задача 4 Урок 10

Задача 4 Урок 10:

Выведите на экран, все нечетные числа, делящиеся на 3 нацело, лежащие в диапазоне от 35 до 117.

var i: integer;
begin
    for i:=35 to 117 do
        if((i mod 3) = 0) then
            write(i, ' ');

    readln();
end.

КОНСОЛЬ:

36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84 87 90 93 96 99 102 105 108 111 114 117