Question

Напишите пожалуйста программу в pascal

Выведите на экран все трехзначные числа, у которых последняя цифра четная

Answer 1

var i: integer;

begin

for i:=100 to 999 do

if (i mod 10) mod 2=0

then write(i,' ');

end.