...

2.3.2. .

.

- , N - .

- , - , . .. N - . . .

:









, D1 - D4 , - .

, Q1 - Q4 . K = A + 1 ( ). δ = J - K.

, = 4 , 16 ( ); δ = 16 - (4+1) = 11, .. 11.


2.4.

2.4.1. .


. . . :

- ;

- : 20 5 ;

- : 630 - 800 ..;

- : 60 15 . : 60000 .


2.4.2. .


2.1



,

,

-0,125

0,1

0,125

0,8

-0,25

0,1

0,25

0,4


2.2



U,

U,

5

16

0,31


2.3


U,

U,

1,5

2

0,75




2.4



,

,

0,1

0,3

0,33



.

2.5


, .


򠠠 a

-0,125

51

0,4

0,8

34

5

0,9

6

1,5

0,1

12

30

0,1

31

0,2

0,07

234

0,004

0,1


2.4.3. IBM.

:

(2.4.1)




:


10 PRINT " "

20 INPUT M

30 FOR I = 1 TOM

40 PRINT " "

50 INPUT X

60 PRINT " "

70 INPUT Y

80 PRINT " "

90 INPUT Z

100 LET A = X * Y * Z + A

110 NEXT I

120 LET B = A * 1E - 6

130 PRINT " "

140 INPUT C

150 LET D = B * C

160 LET E = 1/D

170 PRINT " ";E

180 PRINT " "

190 INPUT Q

200 FOR S = 1 TO Q

210 PRINT " "

220 INPUT T

230 LET K = D * T

240 LET P = 1/EXP(K)

250 PRINT " ";P

260 NEXT S

270 END


=71281,93. .2.5


2.4.4. IBM.


10 CLS

20 SCREEN 2

30 PRINT " "

40 PRINT "----------------------------------------"

50 PRINT " Š ˠ "

60 PRINT "----------------------------------------"

80 IF INKEY$ <> " " THEN GOTO 80

90 CLS

95 SCREEN 1

100 PRINT " ";

110 INPUT N

120 IF N <= 0 OR INT(N) <> N THEN GOTO 90

130 CLS

140 FOR I = 1 TO N

150 PRINT " ("; I; ")"

160 PRINT "

170 PRINT "

180 PRINT "

190 PRINT " ";

200 INPUT X

210 PRINT " ";

220 INPUT Y

230 PRINT " ";

240 INPUT Z

250 A = X * Y * Z + A

260 NEXT I

270 PRINT " . ";

280 INPUT C

290 IF C = 0 THEN GOTO 270

300 PRINT " -

";

310 INPUT TSRZ

320 D = A * .000001 * C

330 G = 1 / D

340 CLS

350 PRINT " Π T..="; G;

"."

360 IF G < TSRZ THEN PRINT "T.. ";

370 IF G >= TSRZ THEN PRINT "T.. ";

380 IF G < 1000 THEN GOTO 420

390 IF G < 10000 THEN GOTO 440

400 IF G < 100000 THEN GOTO 460

410 IF G < 1000000 THEN GOTO 480

420 S = (INT(G / 100) + 1) * 100

430 GOTO 490

440 S = (INT(G / 1000) + 1) * 1000

450 GOTO 490

460 S = (INT(G / 10000) + 1) * 10000

470 GOTO 490

480 S = (INT(G / 100000) + 1) * 100000

490 PRINT

500 PRINT "

P(T)=EXP(-T/T.)"

510 FOR I = 0 TO S STEP S / 10

520 PRINT " X="; I, "Y="; 1 / EXP(D * I)

530 NEXT I

540 PRINT

550 PRINT " , Š ";

560 IF INKEY$ <> " " THEN GOTO 560

570 CLS

580 SCREEN 2

590 PRINT " P(T)=EXP(-T/T..)"

600 LINE (0, 200)-(0, -200)

610 LINE (0, 0)-(600, 0)

620 PSET (0, 0)

630 FOR I = 0 TO S STEP S / 10

: 1, 2, 3, 4