Стр. 10 ГОСТ 25645.204—83
0101
о т о
0 1Cг
0103
01 04
0104
С106
ж
ою ч
о т
о-и
5 110
о п г
0114
0115
5 п б
оно
0117
и»
3,41
0123
5124
1?6
0 1? Я
’ 125 •
П127
0124
0130
81&
0133
И3$
013ft
01 37
0140
014?
0138
0139
0141
0 143
>001
В!:
OOOi
0004
0005
00*16
• ;,» ,? х ,* у < к * ♦ т о .з ,ч с * > г» ,г х ,« г о « » • е ю .з .ч с » ) .* /»
W7« }
РР INT Л-,г>
* , | Л Х . ’ э?
PRINT 222
2 /Г 5 » » .« Х .‘« fftX, • (Г 4**2/Г
РЯ fNT 420
450
1
ГОРЧАТ 1ЗХ* • I! •
С ’
’ O I L * . 9 * , »
е» 7 х ,‘ и* • :ох,
FIV.\
222
*
FORMAT!1 ? ? ( « »Г/ГМ**?1
.
• ,6 Х ,*
>
» )
• , &Х, • ( СХ« * ? /Г } • , 7* .
«,СХгЧГг14<г
Ж’ 500 11=1.50
ООРТ( ILI O G PT!I 1/1ST0R
O O PT?( 1L ) =D C5T 2 ( IL ! / TST OR
I F d L L T i l ) CO T0 4Q1
I F ( i L . L T . 3 ? > GO TO 503
ООРТ I ( IL
=
>«DCiPT I
I
( l l l / I S T C P
i F f i L
.
. t r .
.
lft) rn TO 502.
I L 1=<I L —3? I * !OM OO
II.? » I L I» 10
nO PT3(!L I=D Q PT(IL I*0.]
DOPT 4 (IL 1=OOPT1{I I I «0.1
ОПРТ5( ll)*D O PT ?( I I I $ 0 .1
GO TO 50 4
00РТ4ЛI I I -0ПРТ1<ILI
00 TO 504
Н.2» IL !♦ ?
• 501 ILI • IL-1v•
ППРТ’1 IU*OOPTf M )
00PT5(!L )=0PPT2< II. 1
50? IL I■ (I L - I I 1*2»10
P0PT3(ILI»D O PT f 111*0.5
ППРТА! il )=D0PT1 ( I U * 0 .R
GO TO 504
0QPT5( (LMOOPT?! IL 1*0.5
503ItfcUW*’*1*
ООРТ J( IL 1«OOP
T
СIL >*0 • 2
0Q P T 5IIL )«O O P r?(Il1*0.2
PRINT ?2
GO TO П
•’•S?00PT 4(IL 1= 00P T 1(IL 1*0.2
504 CONTINUE
*OOPT2f I U ;n O ^ 5 d lTI»’ ,r’O P 7 n L b D n P T 3 n ,- b 0 O P T in L ,,0 0 f r ^ i‘ I L b
41° F O R 4 A T { ? x ;. n .5 X ,I 4 , ’ - * , I 4 , ? x . ? » ? X . E 1 0 . 3 ) . 3 X , 2 ( 2 X . E 1 0 . 3 > . 3 X . ? l ? X ,
S O O C oS flW lE
Q
220 FORM AT(/?x,110(1 4 * 1 /)
.
END
• » M;f?i Я а
WLU
SPC 11 0 * 0
1P(1»«0