Pascal:
program zada4a;
var
a,b,c:integer;
begin
write(Введите число кратному 2) readln(a);
write(Введите число кратному 2) readln(b);
c=a/b;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.