Вычислительная техника в инженерных расчетах и моделировании. Черный А.А. - 241 стр.

UptoLike

Составители: 

241
R0:=B[19]*I[J]*P[J]*V[J]+B[20]*I[J]*U[J]*Q[J];
R4:=B[21]*P[J]*U[J]*K[J]+B[22]*K[J]*V[J]+B[23]*Q[J]*V[J];
R5:=B[24]*I[J]*Q[J]*V[J]+B[25]*P[J]*K[J]*V[J];
R6:=B[26]*U[J]*K[J]*Q[J]+B[27]*K[J]*Q[J]*V[J];
Z[J]:=N3+N4+N5+N6+N7+R0+R4+R5+R6;
end;
end;{GB4770}
end.
          R0:=B[19]*I[J]*P[J]*V[J]+B[20]*I[J]*U[J]*Q[J];
          R4:=B[21]*P[J]*U[J]*K[J]+B[22]*K[J]*V[J]+B[23]*Q[J]*V[J];
          R5:=B[24]*I[J]*Q[J]*V[J]+B[25]*P[J]*K[J]*V[J];
          R6:=B[26]*U[J]*K[J]*Q[J]+B[27]*K[J]*Q[J]*V[J];
          Z[J]:=N3+N4+N5+N6+N7+R0+R4+R5+R6;
        end;
    end;{GB4770}
end.




                                       241