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

Question

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

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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.