Pascal :

var a:integer;
begin
readln(a);
if a>=60 then writeln('Hege')
else writeln('Buhege');
end.