Есть 255 частот которые кратны целому числу т.е. 1 частота 1 полный периуд 2 два периуда 3 три и.тд. нужно сложить из фазы так чтобы значения в выходном сигнале были как можно ближе друг другу т.е. разница между максимальным и минимальным значением была как можно меньше.
Если такой алгоритм распределения фаз???
Можно конечно воспользоватся Рандомом но может всётаки есть более универсальный

Код
for I1 := 1 to 255 do
begin
R := Random * 2;
for I := 0 to 511 do
SignalOut[I]:= SignalOut[I] + 600 * Sin(2 * Pi * I * I1 / 512 + Pi * R);
end;
Сообщение отредактировал ivan219 - Aug 11 2009, 12:11