10 INPUT U,V,Z
20 PRINT 1 Œ
30 PRINT |F1.6| U, V, Z
40 INPUT P1, R1, S1, T1, I1,J1 K1
50 PRINT |F1.6| P1,R1,S1,T1,I1.
60 PRINT |F1.6| J1,K1
70 INPUT P2,R2,S2,T2,I2,J2,K2
80 PRINT |F1.6| P2,R2,S2,T2,I2,
90 PRINT |F1.6| J2,K2
100 X=0
101 PRINT Q1,O1,M2,Q2,J2
110 A=P1*X^6+R1*X^5+S1*X^4+T1*X^3+I1*X^2+J1*X+K1
120 B=6.*P1*X^5+5.*R1*X^4+4.*S1*X^3+T1*X^2+I1*X+J1
130 C=30.*P1*X^4+20.*R1*X^3+12.*S1*X^2+2T1*X+I1
140 D=120.*P1*X^3+60.*R1*X^2+24.*S1*X+2T1
150 Y=0
160 E= P2*Y^6+R2*Y^5+S2*Y^4+T2*Y^3+I2*Y^2+J2*Y+K2
170 B=6.*P2*Y^5+5.*R2*Y^4+4.*S2*Y^3+T2*Y^2+I2*Y+J2
180 C=30.*P2*Y^4+20.*R2*Y^3+12.*S2*Y^2+2T2*Y+I2
190 D=120.*P2*Y^3+60.*R2*Y^2+24.*S2*Y+2T2
200 W=Z*A*E
210 N=-1*U*(1-V)*B*F
220 M1=-Z*(C*E+U*V^2+A+G)
230 Q1=-Z*(D*E+U^2*B*G)
240 O1=-Z*(D*E+(2-V)*U^2*B*G)
250 M2=-Z*(U^2*A*G+V*C*E)
260 Q2=-Z*(U*C*F+U^5*A*H)
270 O2=-Z*((2-V)*U*C*F+U^3*A^4)
280 PRINT |F1.6| X,Y,W,N,M1
290 PRINT |F1.6| Q1,O1,M2,Q2,O2
300 Y=y+0.25
310 T=Y<1.1 THEN 160
320 X=X+6.25
330 UF X<1.1 THEN 110
340 GOTO 10
350 END
1. .. . .: , 1958. 502 .
2. .. . .: , 1955. 284 .
3. .. , . .: , 1968, 512 .
4. .. . .: , 1970. 288 .
5. .., .. 3-28 - : . : . . -, 1984. 30 .
-
"
"
: ,
..
. .
..
09.01.90 60×34 1.6
. . .-. . 1,62(1,75) .-. . 1,6
300 . 10
410016 . , . . 77
410010. . , . , 77
