Ввести число.Если оно четное,разделить его на 4,если нечетное-умножить на 5 (Паскаль)
Ввести число.Если оно четное,разделить его на 4,если нечетное-умножить на 5
(Паскаль)
Гость
Ответ(ы) на вопрос:
Гостьvar num : integer;
num2 : real;
begin
readln(num);
if num mod 2 = 0 then num2 := num / 4
else num2 := num * 5;
writeln(num2);
end.
Не нашли ответ?
Похожие вопросы