Пж помогите срочно ​

Приложения:

Ответы

Ответ дал: Аноним
0

Ответ:

Uses math;

Var a,bal:integer;

Begin

Read (a);

Bal:= a*100+400;

Write(min(Ball div 200),5));

End.

Пит:

n=int(input())

Print(min((n*100+400) div 200),5))

Ответ дал: Аноним
0
А раньше никак не написать?
Ответ дал: 0c0
0
сори
Ответ дал: Аноним
0
На пите ещё проще
Ответ дал: 0c0
0
пж кр
Ответ дал: Аноним
0
Чего?
Вас заинтересует