m1 Au/eoaiea
/enae n ieaaathuae oi/eie
RDYOUT:=1; ERROR:=1; PR:=1
Eiae/aneee naeea neiaa ai?aai ia 1 eee 2 ?ac?yaea
(O/aueiny
a IE?YA iinaauaaony!)
d1
Eo?niaoth ?iaioo
naeaaae 24.05.95 2:5020/403.34 (2:5020/235.27)
RDYIN==1 aea
I?aiiaeaaaoaeue: Eaaiaiei 🙁
iao
( A1[0…7] ):=( II[4…11] ); B1:=II[0..3] )
m2 A1[0…7]:=( A1[1..7],B1[0] ) m22
C=C+1 m9
d2
d15
A1[1]==1 iao
A1[3]==1
aea
aea
iao ( k1,k2) =
mod3(A1[0..7]) + mod3(C )
( A2[0…7] ):=( II[4…11] ); B2:=II[0…3] )
m3 A1[0…7]:=( A1[1..7],B1[0] ) m23
B1[0..3]:=(B1[1..3],A1[0])
( P1,S1[0…4] ) = ( B1[0],B1[0…3] ) – ( B2[0],B2[0…3] );C=A2
m4
(P2,S2[0…8]
)=(A1[0],A1[0…7] ) – (A2[0],A2[0…7] ) m10
d3 aea
(
k3,k4) =mod3( p2,S2[0…8] )
S1[0] + S1[1]
iao
d9
iao
(k1,k2)==(k3,k4)
d4 aea
1 0
aea
S1[1…4] ==0
S1[0]
d10
d5
S2[0] + S2[1]
iao
aea
0 S1[0] 1
d6
( A1[0…7] ):=( S2[1…8] ) m13
p1,S1[0…4]=( B1[0…3] ) +1
m11
d12
d11
B2:=B2+1 m5 B1:=B1+1
m6 aea
A1==0 iao
S1[0] + S1[1]
A2[0…7]:=( A2[0],A2[0…6] ) A1[0…7]:=( A1[0],A1[0…6] )
d13
aea
A1[1] +
A1[0] iao
aea
A2==0 iao A1==0
B1:=0 m14
iao
(A1[0…7] ):=( S2[0…7] )
d7 aea
d8
m15 p1,S1[0…4]=( B1[0],B1[0…3] ) – 1
B1:=S1[1…4]
aea
m12
d14
A1:=0 m7
S1[0] + S1[1]
A1:=-A2;B1:=B2 m8
aea
iao
B1:=0
B1:=S1[1…4]
A1:=0 m16
m17 A1[0…7]:=( A1[0..6],0 )
RDYOUT:=0 m20
m19
ERROR:=0 m18 PR:=0
IO[0…11] = ( A1[0…7],B1[0…3] ) m21
Нашли опечатку? Выделите и нажмите CTRL+Enter
