Очень Решается оценка между 4 и 5, мне надо

Karukart Karukart    3   16.05.2020 12:57    0

Ответы
vifi vifi  14.10.2020 20:36

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.

Объяснение:

Думаю я смог

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика