PL/0    hoch
  ähnliche Sprachen: Modula   Oberon   Obliq   Leda   Pascal   Phantom   PL/0E   YAFL  
 


 Hello World   Michael Neumann
"Hello World" ist leider in PL/0 nicht möglich, da es keine Strings gibt, nur 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.
Gibt die Quadrate von 1 bis 10 aus.