Информатика, опубликовано 2018-08-22 22:42:45 by Гость
Ввести число.Если оно четное,разделить его на 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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.