Изобретения и совершенствование на их основе процессов и материалов с применением математического моделирования. Черный А.А - 119 стр.

2465 IF I0 = 14 GOTO 7000
2470 IF I0 = 12 GOTO 6830
2480 V0 = -(A ^ N + B ^ N) / 2
2485 PRINT #1, "КОЭФФИЦИЕНТ ОРТОГОНАЛИЗАЦИИ": RETURN
2490 FOR J = 1 TO X: I(J) = F(J) ^ J1 + V1: NEXT J: RETURN
2500 FOR J = 1 TO X: P(J) = H(J) ^ J2 + V2: NEXT J: RETURN
2510 FOR J = 1 TO X: U(J) = L(J) ^ J3 + V3: NEXT J: RETURN
2520 FOR J = 1 TO X: Q(J) = K(J) ^ J4 + V4: NEXT J: RETURN
2530 FOR J = 1 TO X: V(J) = M(J) ^ J5 + V5: NEXT J: RETURN
2540 FOR J = 1 TO X: Z(J) = B(1) + B(2) * I(J): NEXT J: RETURN
2550 FOR J = 1 TO X: Z(J) = B(1) + B(2) * I(J) + B(3) * P(J) + B(4) * I(J) *
P(J)
2560 NEXT J: RETURN
2570 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * P(J) + B(4) * I(J) * P(J)
2580 N4 = B(5) * U(J) + B(6) * I(J) * U(J) + B(7) * P(J) * U(J)
2590 Z(J) = N3 + N4 + B(8) * I(J) * P(J) * U(J)
2595 NEXT J: RETURN
2600 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * P(J) + B(4) * I(J) * P(J)
2610 N4 = B(5) * U(J) + B(6) * I(J) * U(J) + B(7) * P(J) * U(J)
2620 N5 = B(8) * I(J) * P(J) * U(J) + B(9) * Q(J) + B(10) * I(J) * Q(J)
2630 N6 = B(11) * P(J) * Q(J) + B(12) * I(J) * P(J) * Q(J) + B(13) * U(J) * Q(J)
2640 N7 = B(14) * I(J) * U(J) * Q(J) + B(15) * P(J) * U(J) * Q(J)
2650 Z(J) = N3 + N4 + N5 + N6 + N7 + B(16) * I(J) * P(J) * U(J) * Q(J)
2660 NEXT J: RETURN
2670 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * P(J) + B(4) * I(J) * P(J)
2680 N4 = B(5) * U(J) + B(6) * I(J) * U(J) + B(7) * P(J) * U(J)
2690 N5 = B(8) * I(J) * P(J) * U(J) + B(9) * Q(J) + B(10) * I(J) * Q(J)
2700 N6 = B(11) * P(J) * Q(J) + B(12) * I(J) * P(J) * Q(J) + B(13) * U(J) * Q(J)
2710 N7 = B(14) * I(J) * U(J) * Q(J) + B(15) * P(J) * U(J) * Q(J)
2720 R0 = B(16) * I(J) * P(J) * U(J) * Q(J) + B(17) * V(J)
2730 R4 = B(18) * I(J) * V(J) + B(19) * P(J) * V(J) + B(20) * I(J) * P(J) * V(J)
2740 R5 = B(21) * U(J) * V(J) + B(22) * I(J) * U(J) * V(J)
2750 R6 = B(23) * P(J) * U(J) * V(J) + B(24) * I(J) * P(J) * U(J) * V(J)
2760 Z2 = B(25) * Q(J) * V(J) + B(26) * I(J) * Q(J) * V(J)
2770 Z3 = B(27) * P(J) * Q(J) * V(J) + B(28) * I(J) * P(J) * Q(J) * V(J)
2780 Z4 = B(29) * U(J) * Q(J) * V(J) + B(30) * I(J) * U(J) * Q(J) * V(J)
2790 Z5 = B(31) * P(J) * U(J) * Q(J) * V(J) + B(32) * I(J) * P(J) * U(J) * Q(J)
* V(J)
2800 Z(J) = N3 + N4 + N5 + N6 + N7 + R0 + R4 + R5 + R6 + Z2 + Z3 + Z4 +
Z5
2810 NEXT J: RETURN




                                      119