PL/0    up
  similar languages: Modula   Oberon   Obliq   Leda   Pascal   Phantom   PL/0E   YAFL  
 


 Hello World   Michael Neumann
"Hello World" is in PL/0 not possible, because there are no strings only integer.


 Squares   Michael Neumann 
VAR x, squ;

PROCEDURE square;
BEGIN
   squ := x * x
END;

BEGIN
   x := 1;
   WHILE x <= 10 DO
   BEGIN
      CALL square;
      !squ
   END
END.
Outputs the squares from 1 to 10.