procedure SayGoodby;
begin
  WriteLn('Goodby!');
end;

begin
  SayGoodby;
end.