program jamming;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var a:array[0..10000] of int64;
      i,s:integer;
      k:int64;
      f:text;
begin
  assign(f,'jamming.dat');
  reset(f);
  read(f,s);
  close(f);

 { k:=n; n:=n div 2;
  for i:=1 to n do begin
    a[i]:=a[i]+a[k];
    a[k]:=a[i]-a[k];
    a[i]:=a[i]-a[k];
    k:=k-1;
  end;
      ost:=0;
  for i:=1 to n do begin
  if (a[i]+b[i])>9 then begin c[i]:=a[i]+b[i]-10+ost; ost:=1; end
  else
  begin
    c[i]:=a[i]+b[i]+ost;
    ost:=0;
  end;
  end; }

  a[1]:=1; a[0]:=1;
  for i:=1 to s-1 do begin
    a[i+1]:=a[i]+a[i-1];
  end;
  k:=sqr(a[i]);

assign(f,'jamming.sol');
rewrite(f);
writeln(f,k);
close(f);

end.