' :
1) ;
2) .
, , -, . , ' .
' ' (, ). , , , . , . , ' , . -, ', . . - ' , 1-2-3, . . , , . - .
㳺 , 㳿 , . , ' .
- . , , , (. 4.1). , , .
|
|
( 2, 3, 4, 5), .
' . , . , ' , .
4.1.
, | , | ³ (+,-), | 1 , | ³ (+, -) , | |||||
. | . | . | . | . | . | . | . | ||
-3300 | 40,0 | 41,0 | + 700 | - 4000 | |||||
-760 | 20,0 | 18,0 | - 360 | - 400 | |||||
+900 | 30,0 | 28,0 | -2100 | + 300 | |||||
+2500 | 50,0 | 60,0 | +2500 | ||||||
+820 | 25,0 | 26,0 | +320 | +500 | |||||
+160 | 33,8 | 33,9 | +160 | ||||||
5-4 | 4/2 | 5/3 | (8-7)3 | 6-9 | |||||
ʳ |
ϳ , ' , (, ), ' (. 4.2). , . , , .
ϳ , . .
4.2
10 REM
20 DIM SN* (5), SN (5,3)
30 CLS
40 LPRINT TAB (20); ǔ
50 LPRINT TAB (9);
60 GOSUB 600
70 LPRINT | , | ,| -| | (+,--)
|
|
80 LPRINT | | | c 1 , | ,
90 LPRINT |-----------------|-------------------|(+ --) |-------------------|----------------------
100 LPRINT | | | | | | |
110 GOSUB 600
120 DATA
130 FOR I=0 TO 5
140 READ SN (1)
150 NEXT I
160 DATA 800, 700, 3200, 28700
170 DATA 200, 180, 4000, 3240
210 FOR I=0 TO 4
220 FOR J=0 TO 3
230 READ SD (I, J)
240 NEXT I
250 NEXT J
260 REM
270 FOR I=0 TO 4
280 SD (1,4) =SD (1,3) SD (1,2)
290 SD (1,5) = SD (1,2)/SD (1,0)
330 NEXT I
340 FOR J=0 TO 8
350 FOR I=0 TO 4
360 IF J>3 THEN 370 ELSE 430
370 ON J- 3 GOTO 380,390,400,410,420
380 SD (5,4) =SD (5,3)-SD (5,2): GOTO 440
390 SD (5,5) =SD (5,2)/SD (5,0): GOTO 440
..
430 SD (5,J)=SD (5,J)+SD (I,J)
440 NEXT I
450 NEXT J
460 FOR I=0 TO 5
470 IF I=5 THEN GOSUB 600
480 LPRINT USING \ \SN5(1);
490 FOR J=0 TO 8
500 ON J+1 GOTO 510,510,510,510,530,550,550,530,530
510 LPRINT USING __________; SD (I,J); LPRINT ;
520 GOTO 560
530 LPRINT USING _________; SD (I,J); LPRINT ;
540 GOTO 560
550 LPRINT USING ___________; SD (I,J); LPRINT ;
560 NEXT J
570 LPRINT
580 NEXT I
590 GOSUB 600: STOP
600 LPRINT _____________
610RETUR
, . ' , , , ' , . ϳ .
, . , .
: , ( ).
, , , , . , :
1. 01 .
2. 01.1 .
3. ᒺ .
4. ϳ .
5. ϳ .
6. .
7. 2002 .
8. : , .
, , , ; ; , .