BETA    hoch
 
 


 Hello World   Michael Neumann 
(#
do
   'Hello World' -> putline
#)
Gibt "Hello World" auf dem Bildschirm aus.


 Schleifen-Test   Michael Neumann 
(#
   schleife:  (# n: @integer
              enter n
              do (for n repeat inner for)
              #)
do
   9 -> schleife  (#
                  do 10-n -> schleife (#
                                      do n -> putint; ' ' -> put
                                      #) newline
                  #)
#)
Gibt folgendes auf dem Bildschirm aus:
1 2 3 4 5 6 7 8 9
1 2 3 4 5 6 7 8
1 2 3 4 5 6 7
1 2 3 4 5 6
1 2 3 4 5
1 2 3 4
1 2 3
1 2
1


 Squares   Michael Neumann 
(#
do
   (for i:10 repeat
      i*i -> putint
   for)
#)
Gibt die Quadrate von 1 bis 10 aus.