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

0 голосов
39 просмотров

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


image

Информатика (90 баллов) | 39 просмотров
Дан 1 ответ
0 голосов

Ответ:

Var

x, y :integer;

Begin

Readln(y);

y:=y*2;

If y<20 then x:=5*y+12 else x:=y+12;</p>

x:=x/2;

Write(x);

End.

Объяснение:

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

(1.1k баллов)