Задача 5 урок 10.1

http://fkn.ktu10.com/?q=node/8612

Выведите на экран, все четные числа от 35 до 117 и нечетные числа, лежащие в диапазоне от 45 до 99.
Указание: сначала можно решить задачу двумя циклами, но потом перепишите с использованием одного цикла, в теле которого составьте логическое выражение, описывающее подходящие числа (используйте логические операции).

program task5_lesson10;
var
   i:integer;
begin
     {
     for i:=35 to 117 do
         if ((i mod 2) = 0) then
            writeln(i);
     for i:=45 to 99 do
         if ((i mod 2) = 1) then
            writeln(i);
     }
     for i:=35 to 117 do
         if ((i mod 2) = 0) or ((i >= 45) and (i < 99)) then
            writeln(i);
     readln();
end.