--       p a pp
---      rg puu
 ---     oniutt
  ---    cast((
   ---   et (""
    ---  d.b" !
     --- uieHw"
      ---rogeo)
       --e.ilr;
procedure--nlle
 gnat.io.---odn
a is begin--,"d
 put("Hello,");
put(" world"); 
put("!");end;