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


 Hello World   Michael Neumann 
PROGRAM HelloWorld;

BEGIN
   WRITELN('Hello World');
END.
Prints "Hello World" onto the screen.


 Squares   Michael Neumann 
PROGRAM HelloWorld;

VAR i : LONGINT;

BEGIN
   i = 1;
   
   REPEAT
      WRITE(i*i,' ');
      inc(i);
   UNTIL i>10;
END.
Outputs the squares from 1 to 10.