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