Математическое моделирование на языке Турбо-Паскаль. Черный А.А. - 30 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

30
R4:=B[18]*I[J]*V[J]+B[19]*P[J]*V[J]+B[20]*I[J]*P[J]*V[J];
R5:=B[21]*U[J]*V[J]+B[22]*I[J]*U[J]*V[J];
R6:=B[23]*P[J]*U[J]*V[J]+B[24]*I[J]*P[J]*U[J]*V[J];
Z2:=B[25]*Q[J]*V[J]+B[26]*I[J]*Q[J]*V[J];
Z3:=B[27]*P[J]*Q[J]*V[J]+B[28]*I[J]*P[J]*Q[J]*V[J];
Z4:=B[29]*U[J]*Q[J]*V[J]+B[30]*I[J]*U[J]*Q[J]*V[J];
Z5:=B[31]*P[J]*U[J]*Q[J]*V[J]+B[32]*I[J]*P[J]*U[J]*Q[J]*V[J];
Z[J]:=N3+N4+N5+N6+N7+R0+R4+R5+R6+Z2+Z3+Z4+Z5;
end;
end;{GB2670}
begin
end. 
        R4:=B[18]*I[J]*V[J]+B[19]*P[J]*V[J]+B[20]*I[J]*P[J]*V[J];
        R5:=B[21]*U[J]*V[J]+B[22]*I[J]*U[J]*V[J];
        R6:=B[23]*P[J]*U[J]*V[J]+B[24]*I[J]*P[J]*U[J]*V[J];
        Z2:=B[25]*Q[J]*V[J]+B[26]*I[J]*Q[J]*V[J];
        Z3:=B[27]*P[J]*Q[J]*V[J]+B[28]*I[J]*P[J]*Q[J]*V[J];
        Z4:=B[29]*U[J]*Q[J]*V[J]+B[30]*I[J]*U[J]*Q[J]*V[J];
        Z5:=B[31]*P[J]*U[J]*Q[J]*V[J]+B[32]*I[J]*P[J]*U[J]*Q[J]*V[J];
        Z[J]:=N3+N4+N5+N6+N7+R0+R4+R5+R6+Z2+Z3+Z4+Z5;
      end;
  end;{GB2670}
begin
end.




                                      30

Страницы