В документации написано, как создавать массив, но я не нашёл, как "вручную" добавить значения в массив.
Сегодня у меня получилось добавить (см.код внизу), но возможно, кто-то сможет подсказать, как правильно можно это сделать?

Мой модуль:
## Код:
```
MODULE MyArray;
   IMPORT  In := i21sysIn, Log, Math;
   
PROCEDURE  Array*;
      VAR  
         x: REAL;
         s: ARRAY 8 OF REAL;
         i: INTEGER;
   BEGIN
      In.OpenCommander;   ASSERT( In.done );
      FOR i := 0 TO 7 DO
         In.Real( x );   ASSERT( In.done );  (*Log.Real( x );*)
         s[i] := x;
         Log.Real(s[i]);
         Log.Ln;   
      END;
      
   END Array;

BEGIN   
END MyArray.

(Командер)MyArray.Array 0 0.1 0.3 0.8 1 1 0.5 0
```


Вывод:
## Код:
```
0.0
 0.1
 0.3
 0.8
 1.0
 1.0
 0.5
 0.0
```
