индекс находится вне границ массива
Program RD;
Var X:array [1..15] of real;
i:integer ;
Begin
X[i]:=random(32)-7;
end.

Ответы

Ответ дал: zhenyalazorenk
0
ты i объявил,но не дал ей значение,i:= 1,это пример 
Вас заинтересует