Напишите программу на Pascal

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