Pascal 10. 1 урок задача 1

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

var i: integer;
begin
  for i := 35 to 64 do
    if(( i mod 2) = 0) then
       writeln( 'i = ', i);
   readln();
end. 
vedro-compota's picture

решение засчитано

_____________
матфак вгу и остальная классика =)