посоветуйте как правильно построить график

[vakyla]

константы w,s,a;

for t:=1 to 100 do
begin
for i:=1 to 50 do
begin
z:=((2*a)/(i*pi))*sin((i*pi)/s)*cos(i*w*(t/10000));
x:=z;
z:=z+x;
chart2.SeriesList[0].addxy(t,z);
end;
end;

Здесь я составляю таблицу надо со считать сумму всех значений всех строк по каждому столбцу.В конце построить кривую по полученным точкам.Ось х у меня время а ось у гормоники.
Проблема в том что график строится не правильно слишком много кривых, а мне нужно чтоб получилась одна!

[XuTpbIu]

что-то код совсем несуразный. киньте весь проект что ли.

[Stilet]

слишком многокривых

Почему? А сколько нужно?
Поменяй 100 на 10...

[vakyla]

мне нужно чтоб было 100 точек по времени, и в каждой точки времени со считалась сумма всех 50 гормоник, врезультате получится 100 значений , и по этим точкам построилась одна кривая!

[XuTpbIu]

Я вот никак не могу понять что такое j и как оно относится к z

[Stilet]

vakyla

А давай ка ты задание полностью выложеш..

[vakyla]

я не знаю как правильно решить я представил свое решение задачи может кто другое покажет а задание вот какое!
Есть 50 гормоник они располагаются по оси Y и время по оси Х которое поделено на 100 частей в промежутке от 0,00001 до 0,001 и надо в каждый промежуток времени со считать сумму всех 50 гормоник по формуле z(которая выше представлена).В итоге у нас получится какое то число в каждый момент времени и вот по этим значениям нужно построить кривую!вот и все я вот думаю может через двухмерный массив можно!

[Stilet]

А-а-а ну сразу б так и сказал.
Вот так могу предложить:

var t,i:integer; z,x,w,a,s:double;
begin
w:=10;s:=10;s:=20;
for t:=1 to 100 do begin    z:=0;
 for i:=1 to 50 do begin
  z:=z+((2*a)/(i*pi))*sin((i*pi)/s)*cos(i*w*(t/10000));
 end;
 chart1.SeriesList[0].addxy(t,z);
end;
end;

[vakyla]

stilet

у меня переменные w,s,a:real;z nfr ;я их оставляю так же или нужно менять тип на double???

[Stilet]

как хош
компилятор все равно в double их поменяет