деление на 2 нацело

Решение задачи №1 из главы 10

Задача №1 из главы 10

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

var i:integer; //объявляем переменную счетчика
begin

  for i:=35 to 64 do  // i пройдёт значения от 35 до 64
    if ((i mod 2) = 0) then  // выводим четные числа
       write(i, ' '); //выводим в одну строку через пробел

  readln(); // удерживаем консоль
end.   
Subscribe to RSS - деление на 2 нацело