Android- : play.google.com
->

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 [15] 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33

§ 3.4.

(3.51) - (3.52), ] ( (3.51) 0). /- - , ( pg. ).

. , - . , (3.27) .

(3.51), (3.52) , , , 1 - /V - «» . - , .

; = 1

ai"2 + 6i«i 4 di-O; / - 2, N - I

".+1 + " + =0;

= N

(3.56)

(3.57)

(3.58)

,,, , , .

(3.56) - (3.58) , ,

,

:

w

-tf,

Cj hj ffi

h Dfl

<

<

,0 ChK

, N . N - . 1 , efaac.

, . .

- . (3.56)- (3.58). (3.56) 1 11 «2-

«1

d,!bi.

(3.59)

, , (3.57) - 2, " ./.

+ 2 «2 -1 2 ( «2 4- g\) -\ 4 0.

f>i + C2 fi

. 2217

(3.60) 97



{ - 1)- (3.57) =- 2, / i , . [ -{- I): -

f

Icp. (3.60)1.

/, i. -:* / g,, fio (3.62), », (3.59).

f g ( ~ (3.61) -- N - \ (3.58) - N:

juf - I [n - I /v -/ -1

\b,w + . .- d,K 0.

:

, N / --

f3.63)

, / - 2, i.

(3.61) .

, :

1) /i (3.59);

2) L, g 2, .... - I (3.62);

3) (3.63);

4) (3.61) - 1 1.

/ g, (. 1, 2) . . , ,, (. 3, 4) " .

penieiiHH 9/V

1 (3.56) - (3.58) , . .

, j. . , ;V , .

(. 3.7), peavIyy fipo

CALL SYSTRD (U, , , , D, G, N, IER),

J bOlMlOUTINE SYSTRDCX,A,B,C,F.G,M.IER)

2 »

3 DIMEHSION XC1),AC1),BC1),C(1),FC1),GC1)

4 IER=0

5 IFCN.LT.3)m"l

6 H-N-1

7 =(1)

6 (1)=-(1)

9 G{1)-~FC1)A

10 DO 1 1-2,

K=I~1

12 T-C(I)

13 S-B{I)+T»X<K)

14 X{I)=-A(I)/S

15 1 G(I)=-(F(I)tT»CCK))/S

16 -()

17 X(N)=-(T»G(M)4-F(N))/{B{N)+T»X(H)) 16 DO 2 K=1,M

19 I-N~K

2 2 (1)={1)»{)>(1)

21 RETURN

22 3 m-\

23 RETURN

24 >

. 3.7

A (N), (N), (N). D(N) - N, , bn, , d, (3.56) - (3.58); , , 0; N - , ; G (N) - N; U (N) - , {}-.; IER- : .ER - - , IER 1 - N < 2.

5 3.1. *<00

. -. 1

/ \\ ........ -,..41... » /V.. :--

*» (3.49) ir,, "(3.3) - const (. 3.8).

(3.2) -v3.3) const (. 3.8). , ,

*??°"

(3.52) - 1) :



5 6 7 6 9 lb

12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 26 29

31 32 33 34 35 36 7 36 39 40 41 42 43 44 45 46 47 46 46 5 51 52 53

)« BHn?l3ffiiJ

PRMRAM smo

DIMENSIOS (51),(5),(5).(50),1)(5).(5]).1(2)

,: :

- ,,.1)-« G- SYSTRD

01.

1.

1.1. :

CR- ALFV-

1,2-0$ 1,2-00 ) ]! - DL-

X / - AL(X)

3;\ - QV(X,TAU)

READ ll,CR,ALPV.ALFl.ALF2,Ql,i32.Te,DL F0RHAT(4Fie.3)

1.2. : - ( 5) -

JK-

- . ( 2 )- ,

READ 12,N,riTAU.JK,M

12 0(15,1.3.25) REAP 13,(L(K).K-1,H)

13 F0RMAT(iei5) 4

2. PRINT ]4.CR,ALrV,ALFl,ALF2.Ql.Q2,Te,DL

14 FORMATC5.- ;/IX.CR=,G12.4.3X,ALFV=,G12.4,3X. »ALF1- .012.4.3X. ALF2= .G12.4/1X, Ql- ,C12.4,3X, (32- ,W2.4.3X, - .012.4.3X, DU .012.4)

15 .S,OTAU.JK.(L(K).K-1.»)

15 FORMAT( IX. N-. 13,3X, DTAU- ,C12.4.3X. JK-, I4>1X,

. 3,8

L ;7(1X.1015))

3"

7i 1

35 86

91 92

93 4 5 86

97 8

3.

DO 1 1=1.N

1 U(I)=T®

4. 001: ., .

Nl=tJ-l H=&L/N1

(- )

R1=CR*H»H/&TAU

R2=ALFV*H»H

R3=H«H

4.1. (1=1) (1),

B(l)=-l.-(ALFltH-tR2/2.+Ri/2.)/AL(H/2.) (1)=0.

4.2. (1=2,....N-1) DO 2 1=2,N1

1=()» (1)=1.

AA=AL(XI*-H/2.) G(n=«-(XI-H/2. )/

2 B(I)=-1,-C(1)-(R1+R2)/AA

4.3. (1=N

A(N)=0.

B([J)-i.-(ALF2HR2/2.+Rl/2.)/AL(DL-H/2.) C(N)=i.

J-HOHEP

-

. &

5.1. () S b(lb(Ri»U(l)/2.+QV(e.,J»DTAU)»R3/2.+Qi«H)/AL(H/2.)

5.2. BHJTPEHHHX (2,...,-1) 4 1=2,N1 (1-.

&(I)=(Rl.U(ntqV(XI.J#I/rAU)#R3)/AL(XI+H/2.) 5-3.

I>(tJ)=(RUU(tJ)/2.+QV(r>L.J»r>TAU)*R3/2.-K32*.H)/AL(&L-H/2,)

6. SYSTRD(U.A.B.C,&.G,N,IER)

IJ- - ! - fJ-NE.L(K)) GOTO 5

I6.J.(U(l).l=l.N)

. 3.8



0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 [15] 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33



0.0125
.