| |
|
|
| | Здравствуйте.
пытаюсь найти двойную сумму выражения (двойной интеграл , метод трапеций)
St3[i,j,jjj]*sqr(wk1[i,jjj])
составил такой код :
for j:=0 to m do
for jjj:=0 to mmm do
begin
Dt13[j,jjj]:=0;
for i:=1 to n do
if (i=1) or (i=n) then Dt13[j,jjj]:=Dt13[j,jjj]+St3[i,j,jjj]*sqr(wk1[i,jjj])/2 else Dt13[j,jjj]:=Dt13[j,jjj]+St3[i,j,jjj]*sqr(wk1[i,jjj]);
Dt13[j,jjj]:=0.03*Dt13[j,jjj];
Dt13[j,jjj]:=0.03*Dt13[j,jjj];
Dt131[j]:=0;
//If (jjj=0) or (jjj=mmm) then Dt131[j]:=Dt131[j]+Dt13[j,jjj]/2 else
Dt131[j]:=Dt131[j]+Dt13[j,jjj];
Dt131[j]:=(Pi/12)*Dt131[j];
tetat3[j]:=1.9*sqrt(Dt131[j]);
end;
|
Кто нибудь знает как суммировать 3 - х мерные массивы ? | |
| |
|
|
| |
|
|
| |
для: fsol
(03.07.2012 в 22:35)
| | | Не понятно, что вызывает затруднение? Нужно просто посчитать сумму всех элементов массива? | |
| |
|
|
| |
 661.5 Кб |
|
| |
для: cheops
(04.07.2012 в 13:12)
| | | нужно найти двойную сумму сумму произведения t3[i,j,jjj]*sqr(wk1[i,jjj]) снчала по i потом по jjj , что бы на выходе получился массив от j | |
| |
|
|
