Предмет: Информатика, автор: Аноним

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

Ответы

Автор ответа: maksview
0
var
  x:integer;
begin
  readln(x);
  if x mod 2=0 then x:=x div 2;
  writeln(x);
end.
Похожие вопросы
Предмет: Математика, автор: omelnik647