|
#1
|
|||
|
|||
Ошибка Окно СPU
Добрый день! Подскажите, пожалуйста, где здесь ошибка
Надо найти для вектора zProfit статистическую моду для этого создаю массив FindMo с частотами В этой части кода ошибка: Код:
SetLength(FindMo,4,ch+1); //ch=10 Step:=(zProfit[m]-zProfit[1])/ch; Stolb:=1; Gran:=zProfit[1]+Step; for i:=1 to m do begin if zProfit[i]>Gran then while zProfit[i]>Gran do begin Stolb:=Stolb+1; Gran:=Gran+Step; end; FindMo[1,Stolb]:=zProfit[i]; FindMo[2,Stolb]:=i; FindMo[3,Stolb]:=FindMo[3,Stolb]+1; end; Выдает окно CPU и пишет access violation at 0*767e8989 write of address 0*00030fd8 Последний раз редактировалось Admin, 19.09.2010 в 16:05. |