program kiek_palukanu;

  procedure palukanos (d: longint; var zmog, prek: longint);
    var i, laipsnis: longint;
  begin
    laipsnis := 1;
    for i := 1 to d-1 do
      laipsnis := laipsnis * 2;
    prek := laipsnis;     { 2^(d-1) }
    zmog := laipsnis*2-1; { 2^d -1) }
    { prekybininkas gali paskolinti iki 30000 lit— }
    if prek > 30000 then prek := 30000;
    if zmog > 30000 then zmog := 30000;
  end; { pal–kanos }

  var d, zmog, prek: longint;
begin
  readln (d);
  palukanos (d, zmog, prek);
  writeln (zmog, ' ',prek);
end.