Simula    up
  similar languages: Ada   ALGOL  
 


 Hello World   Simula 67   Michael Neumann 
begin
   OutText("Hello World");
   OutImage
end
Prints "Hello World" onto the screen.


 Squares   Simula 67   Michael Neumann 
comment
   gibt die Quadrate von 1 bis 10 aus;
   
begin
   integer i;     ! ein Integer;

   for i := 1 step 1 until 10 do
   begin
      OutInt(i*i,4);
   end--for-----diese Schleife gibt die Quadrate aus;

   OutImage
end--Ende des Programmes
Outputs the squares from 1 to 10.