Ответ(ы) на вопрос:
Var
k, p, s: integer;
begin
readln(k, p, s);
k := k * (100 + p);
writeln((100 * s) div k);
end.
Не нашли ответ?
Похожие вопросы