Question

Ввести число если оно четное разделить его на 4 если не четное умножить на 5

Answer 1

Pascal abc................

Answer 2

Var A : Integer;
Begin
  Readln(A);
  If Odd(A) then A:=A*5 else A:=A div 4;
  Writeln(A);
end.

Answer 3

Хорошо, я могу помочь вам с этим. Пожалуйста, введите число, с которым вы хотите произвести операцию: