Помогите пожалуйста. надо программу на паскале .

Выведите (через пробел) все четные числа от a до b (включительно).

1

Ответы и объяснения

2013-02-10T12:58:58+04:00

 Var a,b,i:integer;

begin

read(a,b);

for i:=a to b do if(i mod 2 = 0) then write(i,' '); {Пробегаемся циклом по этим цифрам и смотрим у кого остаток от деления на 2 = 0, если равен значит четное и выводим это значение}

end.