Стр. 96 ГОСТ 25*43.341—83
58 3
PRI NT 2 6Г
5 8 4
30 Ir < L 0 ? .N F .l) СО ТО
6 0
-----
^
5 8 5P
r i n t
? 7
o
. <
p
I
n
<I ) , I =
i
,
n i
3 8 6
PRINT 280 ’ » CFi F ( I , Л , I =1 , 10 ) »J=1 Lk R>
5 8 ?
PRI NT 2
9
o
»< T
Ь
I G
e c
l »J> » I = 1 » J 0 > * J = 1 .tV .P )
5 8
8
60 l Г Ёl
0
* . N
£ . 2
) СО TO
?0
5 8 9
p
r i n t
300
? A0 • i c
f
J E ( ] • J ^ , 1 * r . i\Q~) • j = b LHP )
m
o
. » »г 1N ( 1 , j ) ,*| =1 , i 0J s ’i . LKP >
59 0Рй I NT
3 9 1
p PI NT
5 9 2
P P I N*
5 9 3PRI NT
820 • * ( f p l l . J > I s 1 f 10 > •J s l . L u P )
? 9 о * • <SfJ ОE { ] . j », I a i ,
1
, j s 1 , t к P J
f
‘
5 9 4PRI NT8 30 • >.* SilGN ( I • J ) IT *1 , iO*). j > 1 , Щ Р ) 3 9 5
PRI NT8 4 0 • J i S 11. » ( I . J >. I = l , ji, 0 )* J = 1 , L КP )
3 9 6 TO l F * L O T . N C , 3 > GO TO 8o
3 9 ?
PRI NT 5 50
5 9 8PRI NT ? d C ’ * ( j ) F ( ! j J > . I « 1 , 1 0 ) . J s l / L K P )
5 9 *
0 p I Nr 2 9 0 • i • 3 J Gf (’I *••) * I = 1 . 1 0 ) . J г 1 , ц ц p l
600
80IF ELKP. EO • J » GO
T
O 9 о
60 1
P
R
J
U
T З
А
О . E
M
N( I J , 1 - J , I r )
602
i n o
F ОP
m
a
т i 2 413 1
6 0 311 о FORM* * » 6E 1 2 . b)
60 41 2 0 F OR M* * с т | i 0 ) .
6 0 3
1 3 0 FORMAT» »
O
f т ,
i
)
6 0 6
14 0
FORMAT « *
к
О п и ч ^ с т 0О ■’И
Л
О
В
ЫХ ПОВЕРХНОСТЕЙ ИС
.3 Кт г *1 3 ’
6 0 ?
1 5 0 FORMA г </ / , 2ПХ . Гмдч’д Р ь му Р ДАнНМЕ «ПРОГРАММ*
«А 3 ) ’ , / / )
6 0 6
1 6 0 FORMAT ( I X * »NА »
n
B
i
NH I NCj .’i,O r , LK P . LPR , ^ И. КP(>
. * Р П , К 0 Г , K A S . I P 0 »L BR * »2 X
6 0 9
• . 1 * 1 3 )
6 1 0l ? О г О Р м А т j 1 X » »NP , < 0 » • JX ,
2
I 1 fi )
611
1 80 FORMAT{ I X » #At . , 5 X . O F J 3 . 3 )
612
1 9 о FORMA T < IX * »BF * ,
5 / . OF i 3 , 5 ,
6 1 3200 FOR
m
a
*( 1 X* * H », 3 X , 9 £ ) 3 . 3 *
6 1 4
2
2
0
F
O
R
M
A r ( / , 2 a
x ,
»
riA PAMFTPy
f
lO
f
t
E
PXH()C
Д ft
( T
И
ПО
•
И*.ВЬХ И ft TDP0 rft ПоРЯд’к’д)
6 1 5
• ИСЗ * * / )
6 1 62 30 r ORMAT Г1 X , #TW» , 5 / , E 1 4 . 5 » 13X , «5м » • Л # g l 4 . 5 »
13 X• «ОМ»,
3
X, E J 4 . 5 /
6 1 ?
• 1 X # «C
p
»
»
3
a
,
a
.
i 4 . 5 / i x , » C T # , 5 y , 9 E l 3 . 5 ,
6 1
8
2 4 0 FORMATE IX * « к P T » , 3 X , ? 4 J 3
1
6 1 92/, 1 FORMA т I 1 X
1
«кОЗо® и П и р и т у noRf t CTOC г й » , 2X . 1 Oi.
Ю . 4 ,
620
2 4 2 FORMATE l x , ’ HOMf PA п(1в - й 2 - r O ПО
p
ЯЛ< д , < ОTОP
Ы* п р и Н д д л Ь * А Т С 0 о т в £ Т Ст
6 2 1
• В910МИЕ«СТи
и с к л ю ч е н и я
/ j х , 42 I 3 »
;
•
622
2 4 3 FORMAТ
( I X * «МАЧЛЛ и ыЕ НОМЕРА ОВЛ
д
С
т е й
^СКПК
•»ЕчиЯ СООт ВЕ’ Г Tft yr t uEp по
623
• ВЕРХНОСТИ 2 -
Г
0 ПЭ Ря я к А . . / j х .
4
? | 3 ) -‘
6 2 42 4 4 ГОЕМАТЕ IX » «КОНЕЧНЫЕ н 0 мрОд
р
В ЛАС^
е
’& А С
к
ЛИЧ
ЕНИР COOTftt I CtBNiOuJES r’Oft
6 2 3
•
П
Р
ХНО
СТИ
2 - Г О
ПОРЯ
Д
КА *
.
/ 1 X •
l
2 I 3 >
626
2 3 0 FORMATE/ / . 2 0 Х , «П
а
р
а м е т
р
ы
з Ак Он Ов ОТ. ^ Ж
Е
н Иц
м о Л р к у Л » , / / ) »
62?
2
бо
f o r
m
a t
» l x » «
з е
р
к а л ь н о ео т
р
а ж е н и е
Х»‘<^«?к’ул m
ПОВЕРХНОСТИ • *’
6 2 82 ? О rORMATE IX , « З Е Р КАЛЬ НО. ЛИ9 Т УЗ Н0 Е
.
0 [ Р д ‘ХЕНЙЕ«,
/ I X » » f ! N » , I X , 1 0 6 1 2 . 4 )
629
280
F
O R
M
A T E 1 X ,
«F
i
e
»
, З Х
,
ЮЕ12,4>