Предмет: Информатика,
автор: sonechka121314
Помогите пожалуйста. Очень срочно! Решается оценка между 4 и 5, мне надо 5, прошу помогите.
Приложения:

Ответы
Автор ответа:
1
Ответ:
Var
x, y :integer;
Begin
Readln(y);
y:=y*2;
If y<20 then x:=5*y+12 else x:=y+12;
x:=x/2;
Write(x);
End.
Объяснение:
Думаю я смог помочь!?
Похожие вопросы
Предмет: Русский язык,
автор: TaylorMomsen17
Предмет: Другие предметы,
автор: nastyasotnikova2003
Предмет: Русский язык,
автор: amir9999
Предмет: Математика,
автор: Малыш2505
Предмет: Математика,
автор: киса5577