Program PR1;uses crt;var x:real;beginclrscr;writeln('Vvedite x');readln(x);writeln('Y=',1/(2-x));end.