ОСТ 92-0236-74
Завантажити документ
Формат .docx · доступно зареєстрованим користувачам
Текст документа
P&S'W
I.I.
(Ax(t)‘Bx(t)*Cx*ft) ■?>&?(*); (f)
ax(xT^Ty^(/(T^T).cx(f<r)^(/ir) t (2)
W X ~ t - x(t) - - - - 1.3. ~ 1.4. ( x y)(KT-T)-S(i)(/tT),
( 3 )
ft 1.5. 1.6. (W w
1.7. /& * Mt-f (<
1.8. 1.8.I. — 1.8.2.
£?=/ = L.&A 2$ & ^ ($)
I„Se 1.9.1. • 2.9.2. s,
( I.9 booth 2.9.5.
2. 2.1. W X - 2.2. - - 2.3, 2.3.1. Bt, ~ Ci~f) ■?
Ci ~Ci.~t ( Al-WAiCl ;
Bi Ct =* ne A& =A; Bo^B't e&^e.
<Z"
(20)
• *■?
2.3.3.
I. І?.І?. 1.2. // 2. ST(t,A,8, C t 2>,AM,BM t
2. K?A 2.1. ■?
2 2.3.
2.4. 2.5. 3.
3.1. - - * - 3.2. 3.3. 3.4. 3.5. 3.6. 3.7. *S“ a
w
* s 44
* , Sn KI’ •<• Ssff I to ftI to 9> < ai < • ft 4
a 1 Uf 4^ J
a. ft
ft
A ft to et to 4 s
htW/
) •w-^.-^iHt.^a.an^imvr J *••* - FOR ELSE MPT5UC f E?, MATRlBrBrRtN);
H E PROCEDURE &Y(T ( R,B,C,O'flM,8M,CM,pM,t,N,M);
REAL Etou Integer 3E61N R ftRA V a ( M1O FOR i: M/tTRexPcStMiO'Lio^NBMATMiiata'afHKiumQhc.S'Nj;
FOR i:>1$TEF 1UHTXL N90 FOR 3J FOR I : Sn,M*31|.$bM*3UaCI y Kl*D(X BEOXN RRRfy RC1:m FOR X:b1 RCi t 3X:*eMtt t 3j;cMDMCitN*3i:>J>McX'3iENQ ; for k: matrxxinveRtxm. EPS ♦? 71%, , & SOTO emo POOAJHT^&iCr&fjeMfBM/CMfDM);
IF KPUCTfT,*.B,C,0,AM,BM,CM f ELSE
POiefitJ gup J
I
< s
5. 5.1. - ~ ~ 5.2. 5.3. 5.5.
& OUTPUTP BEGIN ARRAU fl,8,011 * N,1:N],Df1;N,1:MJ,AM,CMf REA L T;
PROCEDURE MATR(fl,B;p > N);Vflt.UE NjTNTEGER NJflRRAU A,B,C’, BEGIN INTEGER I, 3, FOR I'.sHSTEP 1U4TIL MOO FOR 3*.*1STEP '1 UNTIL NDO
begin ot 1 1 FOR I; = 1STE₽? 1UNTIL 1 until noO PROCEDURE MRTREXP(fl, FOR i:=1$TE₽? lUHTlL CCl,Dl:eBti.31;END ; **■?
l:=i;
FOR k;x 2ST FOR UxtSTEP 1UNTIL NDO FOR JHMSTEP 1UHT1L HDD MATRR,C,6,N);
FOR 1; xT STEF 1 UNTIL NDO Bt I, I H*B[ 1, 11 +1;
I V I m 1 e>
10 I tf>
II
) I r>
If
•1 it
tn
V>
tl
v>
2 IO
I ffH 12 I 0
I tn I 1 II
1W
s I 0 IO
i I 0 1 ( 1*
I m II
I I II
I'
tn
1 -4 I tn
v>
1tft
t a?
tnT>(ft
IC e>
AJ
t x
<□?
I <ft 1 10 to
I 3!I at
jte is ₽?>
I m IS I ' < II
tn p.' ( ■? I 10 IX 1-е?
3K 10 I Q
left 1 -4 im
. IC 1 It
tn
II
V>
2
< • <4
It№?
II №?
I IIu
II
lift 1 IE
I < 1 eft
>c ) II
1< I 14
10 '(
N
**>
X
fiodguCa 33 w J
I ₽? st
IB
I 1 w
J w>
• " 31
I 1m . t to I
I it
1 — 3:
tX
fl
</>
I I - ■?& X
& Itn ta t VS U3 ■? • s s>
*•' tw
• ’tg
1’0 J -I X
M t tS5 ix
w I X I m 1 x
x li to
№?
s. 1V IO
■? It II
< t? £?
IW •S.
im t 1 > ! nt Im I
& Mi
END 1 OUT₽?UT( IF OUTPUT CT ELSE
OUTPUT ( END ;
END ; 3IGMAU231:
I. І?.І?, 1.2. 2. 2.1. 2.2. 2.3. 2.4= 3.
3.1. - - - £?
& N / / .. ..... .
f 4. BEGIH IRTEBER BEGIN PROCEDURE MflTR( SEGis INTEGER FOR i:=-1STEP ™ BEGIN Dt 1, 31: DEI, 31; = pfl, FOR i:=1STEP 1UWTIL END M/tTR;
PROCEDURE MATRIX!NVERI(N,EPS, BEGIN ARR&y COMMENT REAL SP, 1WTESER I S 9,M; ■?" • ** ■?**
M;=Sp:=G;
FOR i:=lSTEP tUMTIk woo FOR Sl-ISTiP fv||TU UMKfl'.FQS I-.sMSTEP 1UMTIL S4D0 FOR OV^tSTEP (UNTIL GE I,33:*DCI,3]-FCl,3);MATRIXIMV *WR(E, G,&,N);MATR<r, G, F , N); MflTR(P, F , G, N) J MflTR ( MRTRtD, FOR V-t=1ST
MHTR(F,E,H,M);fOH I:=1STEP 1UHT1L NOO S₽?:’SP+Hf I, 11: F 1 041 < 5. 5 - - - X
BEGIN INTEGER NJ INPUT(M)1 OUTPUT(*E’,N, '/') ; begin ARRRV PROCEDURE MRTR(R,0,C,N)J V BEGIN INTEGER I.S.KJARRAV FOR W ?2 ENB mrtr; • * •*
RERL PROCEDURE 4nOK(fl,e,C, BEGIN
COMMENT REAL $ INTEGER M'scPteo;
FOr l’*=ifTEP 'Until ndo for UilK/)!FOR l:-fSTE₽? (UNTIL Gt I, 3 3 : = DtI , 21-FI 1,3 3 ; MATRIX INVERTIN, EPS,G) . FOR Ilst-iSTEP TUNTtL N00 FOR &np.S&
END END ;
MATR (F, 4(1 OK : = N-$P/ END INPUTS,& R C •;
OUTPUTC'E' , OUTPUT(‘T’, , M end ;end ;
5IGNAU231:
I. 2. Paew 3. '4.