Test.obn

   1 MODULE Test;
   2
   3 IMPORT Out;
   4
   5 VAR
   6   i : INTEGER;
   7
   8 BEGIN
   9   Out.Open;
  10   i := 48;
  11   FOR i := 32 TO i DO
  12     Out.Int(i, 0); Out.Char(' ');
  13   END;
  14   Out.Ln;
  15 END Test.