Предмет: Информатика, автор: sonechka121314

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

Приложения:

Ответы

Автор ответа: 123Dinamo
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.

Объяснение:

Думаю я смог помочь!?

Похожие вопросы
Предмет: Математика, автор: киса5577