индекс находится вне границ массива.Что такое?


Program RD;
Var X:array [1..15] of real;
i:integer ;
Begin
X[i]:=random(32)-7;
end.

0