Написать программу, которая для случайно введенных с клавиатуры числе а, в, с выполняет действия:
а) Четные числа делит на 2 и результат выводит на экран
б) нечетные числа выводит на экран без изменений

Var a,b,c:integer;
begin
read(a,b,c);
if odd(a) then write(a, )
else write(a/2, );
if odd(b) then write(b, )
else write(b/2, );
if odd(c) then write(c, )
else write(c/2, );
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.