program Hello;

 procedure SayHello;
 begin
  { tworzymy okienko }
  { wywietlamy w nim napis "Hello" }
  { zamykamy okienko }
 end;

begin
 SayHello;
 SayHello;
 SayHello;
end.