Уменьшите данное число (х) в 2 раза если оно четное!информатика

Уменьшите данное число (х) в 2 раза если оно четное!информатика
Гость
Ответ(ы) на вопрос:
Гость
var   x:integer; begin   readln(x);   if x mod 2=0 then x:=x div 2;   writeln(x); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы