program jamming;

{$APPTYPE CONSOLE}

var
f1,f2:text;
p,s,i:integer;
a,b:array[1..10000]of integer;


begin
  assign(f1,'JAMMING.dat');
  reset(f1);
  assign(f2,'JAMMING.sol');
  rewrite(f2);
  read(f1,s);
  a[1]:=1;
  a[2]:=2;
  i:=3;
  for i:=3 to s do
  begin
  a[i]:=a[i-2]+a[i-1];
       end ;
       p:=a[s]*a[s] ;
       writeln(f2,p);
       close(f1);
       close(f2);


end.