Sirius

Hello World

Michael Neumann

@ Hello World in Sirius @

PROGRAM Hello_World
   OUTPUT ('Hello World')
END

Gibt "Hello World" auf dem Bildschirm aus.

Squares

Michael Neumann

PROGRAM Squares

PROCEDURE iterate (INTEGER start, ende)
   DECLARE i AS INTEGER

   WHILE (start <= ende)
      i := start * start
      OUTPUT (i)
      start := start + 1
   NEXT
END

iterate (1, 10)

END

Gibt die Quadrate von 1 bis 10 aus.