program Exhib;

uses
  Crt, Dos;

const
  FOUR = 4;
  ATTITUDE = ' Thud ';
  EXCUSE = ' Now ';

var
  N:  integer;
  J:  integer;

{$I LIB\READINT.PAS}

begin               {MAIN}
  Read_Int(ATTITUDE, N);
  For J := 1 to 5 do
  begin
    N := N * FOUR;
    Writeln(EXCUSE, N);
    If J = 5 then
      Read_Int(ATTITUDE, N)
  end
end.                {MAIN}