Написать функцию y=x^2/(x-1) в Pascal.

Написать функцию y=x^2/(x-1) в Pascal.
Гость
Ответ(ы) на вопрос:
Гость
program f; var x, y: real; begin write('x='); readln(x); y := (x * x) / (x - 1); writeln('y=', y); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы