Var num : integer;
num2 : real;
begin
readln(num);
if num mod 2 = 0 then num2 := num / 4
else num2 := num * 5;
writeln(num2);
end.
тест, блок-схема 30 баллов
Ответы на вопрос
Ответил Аноним
1
Ответ:
Объяснение:
Добавил в скриншоте
Приложения:

Новые вопросы
Информатика,
1 год назад
Английский язык,
1 год назад
Физика,
1 год назад
Химия,
1 год назад
Математика,
7 лет назад