program hei; var i, n, veakood: integer; begin val(paramstr(1), n, veakood); if veakood<>0 then n:=1; for i:=1 to n do writeln('Hei!'); end.