Question

Паскаль. Составить программу вычисления значений функции y=1/(x-1)

Answer 1

Ответ:

Free Pascal

var

x: integer;

begin

writeln('Input x:');

readln(x);

writeln('y=', (1/(x-1)):2:2);

end.