{ Найти значение выражения ( -натуральное число, а>0, х>0, у=1+(1/(1+(1/1+...1+1/x))..) ) n знаков "+" }

uses crt;
var x,n,i : integer;
        y : real;
begin
  clrscr;
  write('n=');readln(n);
  write('x=');readln(x);
  y:=x;
  for i:=1 to n do y:=1+1/y;
  write('y=',y);
  readln;
end.