Лабы по Delphi с готовыми программами / Поиск и сортировка массивов
.pdf
K--
4 j , %' )
^ j '
& e ^ ,
& h i d
) &
)
3 j % %
'33 I
&) 3 ) j
3Y # " &$
4 , 3
& e &% )
4 ' &
& & j & &
3# * 3* 3* # * 3 4 # ) &
|
+0 6 |
|
|
|
|
C ** C ** * # 5 |
|
|
4 & & 3 |
* c ** 0 * * # * # 5 |
|
3 & ' &
+678 )+%7!
#g & &
3*! 4
$% &; * K--
;<'= >= =? @
;<AB > >C?D'@
;<>E '=@
;<F?? G?> BEHBC>@
! I H UUH
PP 3 m R // , ( 6U y + 0#%%5a4 ( !
L*9:9*&9d*9*#&95#&9:#:9&5&95*e*9a:O
) + 0#%% &4 ( ! E HN + X U (
+ '( !PP .1]x s k 9n+ '( !
6M + '( !
6U y y (8 ^+ ( ! 6 ! (
PP , m 3 R]. // /3]S , S /3 W (8 I Z
+ C NL O D ! L O 8 0 4+ (8 IL*##O
PP Q , S., ,. / R R ,, k // N U(LVH M VO
+ C NL O D ! L O 8 N L 0 49V VO N U(
N U(
PP/ R R 1 6U y y (8 ^+ #
PP Q R , S 3\, k s k 9 3 m.
N U au 6U y 0 6U y y (8 ^q*4 C (! L O 8
( L 6U y y (8 ^O
+ 6U y 0 6U y y (8 ^4+
n+ _
E HN + M
0n4 0nq 4 ( E HN + = U
U 6 ! (
6M + 0n4
0n4+ 0nq 4
0nq 4+ 6M
(8
8 Ln9 O
M( U ( LLn #O (8 E HN O
( L O
M( U ( L D ! L OO 8 L 6U y y (8 ^O
M( U ( L 6U y y (8 ^_*O
N U(LVH VO
PP Q , S., / R R ,, k //
+ C NL O D ! L O 8 N L 0 49V VO
8U(
(8%
4 % 4 nL=NRnRN:;T o;?:nRN:;T %
I %%' % I HKLMN 7 %'
! ?
) + (!VD UU J U8tV 6 ! (
N U(L O 0*4+VgV N U(L O (8%
&
D UU J U8t
g UU J U8t
%' "
&$
$% &? * + % ,,-# I I-%-J
;<'= >= =? @
;<AB > >C?D'@
;<>E '=@
;<F?? G?> BEHBC>@
! I H I6 U M(
W" ) Z
' # ? 'F 1"` YI * & `!
E A 2
"
: 2 P < A A 2
WXKPRYP P*LZ
WX?[RY RY\*SKZ
WXY]RKPZ WX^**(_*Y L[]F[\YZ % & ` ^ J) $$
% &" ' K ^ J+ J &: #0
K
:& 1N & S =+ 0
& 6 +< 8< <91<0 # + 8 90
W:& Z
WK ^ JZ
$$
% &" ' * ^ J+"& ) J &: #0
K
:& 1N & S =+ 0
& 6 # +< 8< <91<8 9 b >0
$$5 , . ; :' " & ` I+"& ) J &: #0 #
K
)'# 1 8N9
:& 13 & S =+ 0
&
: )'# 8 9 = )'# 1 8 9
$$5 . ; :' " & ` +"& ) J &: #0 #
K
)'# 1 8N9
:& 13 & S =+ 0
&
: )'# 8 9 = )'# 1 8 9
$$5 ; :' " & +"& ) J &: #0 #
K
)'` #
)'` 1N
:& 1N & S =+ 0
& )'` 1)'`T 8 9
)'# 1)'`$+# =+ 0 T 30
$$7
"& ) 1O
R J 83!! 9 &: #
K ^ J+R 0 6 # +<` 1< ` +R 0 b >0 6 # +<` I1<` I+R 0 b >0 6 # +< 1<+R 0 b >0
[' ^ J+R 0
#!
$ # " * # % o
0 ! : %
# B
! %
! "
: 2 Q < R% 2 1 2 % > >
WXKPRYP P*LZ
WX?[RY RY\*SKZ
WXY]RKPZ WX^**(_*Y L[]F[\YZ % & ` ^ J? R `&
:' " & ? ^ J+ "& ) J &: K
) J &: 0 K
d M # K
$$7 5 DE-5 7 k 7 2E .
: # =+ 0 T # =+ 0 # =+ )0 =
H )'# 1A3
YI
$$D E 5 5 ,
1N d 1N M 1N
$$/ , , 5 7 2
$$, . .C 2 2 5 2E . Ejk 6= # + # =+ 00 +d # =+ 00
&
: 8 9 1 8d9 =
)8M9 1 8 9
"+ 0
#)
)8M9 1 8d9
"+d0
W :Z
"+M0
W6= # Z
$$, E C 7 ; 2E . Ejk : # =+ 0 = :& # 1N & +# =+ 0 A 0 A 3
& )8MT#9 1 8 T#9
#)
:& # 1N & +# =+ 0Ad0 A 3
& )8MT#9 1 8 T#9
$$5 ; 2E . Ejk H )'# 1# =+ 0 T # =+ 0
W? ^ JZ
% &" ' * ^ J+"& ) J &: K 0
K
:& 1N & S =+ 0
& 6 + 8 9< <0
W* ^ JZ
)'# J83!!3NN9 &:
"&' K
W 7 Z "&' 1? ^ J+83 O U V c 3O 3b 3U9 84 b 339 )'# 0
: "&' N = B # +<Y & G': ` #<0 #) * ^ J+F# " + )'# "&' 00
H #!
Q " &'$(
* # 1 T "
S " ( #8
S " % (
% &" ' ?& +"& ) F&' " R ) L&' K 0
- ZIF?J= & #)
p=@< & #)
qIF;< & # # #
:S #. T## U S "
: 2 V < W > > S #. T## U
:' " & ? ^ J+ "& ) J &: K
) J &: 0 K
d M # K
$$7 5 DE-5 7 k 7 2E .
: # =+ 0 T # =+ 0 # =+ )0 =
H )'# 1A3
YI
$$D E 5 5 ,
1N d 1N M 1N
$$/ , , 5 7 2
$$, . .C 2 2 5 2E . Ejk 6= # + # =+ 00 +d \ =+ 00
&
: 8 9 1 8d9 =
)8M9 1 8 9
"+ 0
#)
)8M9 1 8d9
"+d0
W :Z
"+M0
W6= # Z
$$, E C 7 ; 2E . Ejk : # =+ 0 = ?& + 8 9 )8M9 +\ =+ 0 A 0@) m &:+ 00 #) ?& + 8d9 )8M9 +\ =+ 0 A d0@) m &:+ 00
$$5 ; 2E . Ejk H )'# 1# =+ 0 T # =+ 0
W? ^ JZ
/ 2 % > L M
0 :-!
: % #
1 # : : #
0 V# ! (
+ ,)
" : # & "
)
#
4 : # #
+ D " ,
$" #
" $ ! "
" #
! !
V " "
# 4
Dr
: 2 ;X < / 2 % >
WXKPRYP P*LZ
WX?[RY RY\*SKZ
WXY]RKPZ WX^**(_*Y L[]F[\YZ % & ` ? F& R `&
$$, C D ,
"& ) [M1N$$C D ,
G':: F m 1A3$$5 2 DE-
K # K I1A4$$E ,
$$, 7
:' " & ? F& +
J &: K$$E
': J &: K$$DE- P ) K `$$, ;
\ ) K ` K$$, ;
0 K
% &" ' ?F& + P ) \ ) K 0
` d &K I P ) L&' K
` 1+ P ) T \ ) 0
4$$
$$E ,E 7 , n Ej 2
: + P ) ` 0 = ?F& + P ) ` 0
: ++` T30 \ ) 0 = ?F& +)'""+` 0 \ ) 0
$$, E Ej E . DE- P ) L&' 1+` A P ) 0 T 3 ?& + 8 P ) 9 ':8N9 P ) L&' @) m &:+K 00
1N
d 1` T 3
&K I 1 P )
$$7 E/ / , 2 / E
6= # + P ) L&' 0 +d 1 \ ) 0
&
: ':8 9 1 8d9 =
8 &K I9 1 ':8 9
"+ 0
#)
8 &K I9 1 8d9
"+d0
"+ &K I0
W6= # Z
$$, . ; , . /
: P ) L&' =
?& + ':8 9 8 &K I9 +P ) L&' A 0@) m &:+K 00
W?F& Z
`% K
W? F& Z$$7 , En
: P ) K ` \ ) K ` =
`% 1P ) K `
P ) K ` 1\ ) K `
\ ) K ` 1 `%
$$, , , ,
: +P ) K ` N0 & +\ ) K ` S =+ 00 = H )'# 1 K # K I
YI
$$, 2 DE-
: \ =+ ':0 +\ ) K ` A P ) K `0
4 =
H )'# 1 G':: F m
YI
$$E
?F& +P ) K ` \ ) K `0
H )'# 1 [M
W? F& Z
$$5 . n
% &" ' * ^ J+"& ) J &: K 0
K
:& 1N & S =+ 0
& 6 + 8 9< <0
W* ^ JZ
$$2 E5 2 5 7 % &" ' o ^ J+ J &: K
P ) \ ) ^Q #' K 0
K
H &` m$$i 2 i 7 E5 / 5
:& 1 P ) & \ )
& 8 9 1H &`+^Q #' 0
Wo ^ JZ
"& ) 13b@3N4a
J8N!! A 39 &: K
`% J8N!!
49 &: K$$DE-
`h"&' K
& K
W 7 Z$$2 7 E5 2 5 7 o ^ J+ \&6+ 0 S =+ 0 3NNNNN0
$$5 4N ; : 4N = `h"&' 14N #) `h"&' 1 B # +<F&' " J<0
* ^ J+F# " + `h"&' 00
B #
B #
$$,
& 1? F& + `% \&6+ 0 S =+ 00
: & [M = B # +<Y & <& 0
S # +30
$$2E . + 4N ; 0
B # +<F& J<0 * ^ J+F# " + `h"&' 00
B #
B # +<* Y & YI <0 H #
!
0 " & $GI>S $
! 1
Dr &
" # #S7 #
"$! "
"
*
% # NS #. 7 # "
: 2 ;; < W 4 2 2 % >
"& ) ?FL' [:: 1 3b$$7 / ,E ,
!!!
:' " & ? F& +
J &: K$$E
': J &: K$$DE- P ) K `$$, ;
\ ) K ` K$$, ;
0 K
$$, ,
% &" ' K )F& + P ) \ ) K 0
d #
:& 1 P ) T3 & \ )
&
# 1 8 9
d 1 A3
6= # +d A30 + 8d9 #0
&
8dT39 1 8d9
d 1dA3
8dT39 1 #
WK )F& Z
% &" ' ?F& + P ) \ ) K 0
` d &K I P ) L&' K
` 1+ P ) T \ ) 0
4$$
$$E ,E 7 , n Ej 2
$$5 ; / D .C ?FL' [:: 5 E
$$,
: + P ) ` 0 =
: +` p P ) 0 1 ?FL' [:: = K )F& + P ) ` 0
#) ?F& + P ) ` 0
: ++` T30 \ ) 0 =
: + \ ) p )'""+` 00 1 ?FL' [:: = K )F& +` T3 \ ) 0
#) ?F& +)'""+` 0 \ ) 0
$$, E Ej E . DE- P ) L&' 1+` A P ) 0 T 3 ?& + 8 P ) 9 ':8N9 P ) L&' @) m &:+K 00
1N
d 1` T 3
&K I 1 P )
$$7 E/ / , 2 / E
6= # + P ) L&' 0 +d 1 \ ) 0
&
: ':8 9 1 8d9 =
8 &K I9 1 ':8 9
"+ 0
#)
8 &K I9 1 8d9
"+d0
"+ &K I0
W6= # Z
$$, . ; , . /
: P ) L&' =
?& + ':8 9 8 &K I9 +P ) L&' A 0@) m &:+K 00
W?F& Z
`% K
W? F& Z$$7 , En
: P ) K ` \ ) K ` =
`% 1P ) K `
P ) K ` 1\ ) K `
\ ) K ` 1 `%
$$, , , ,
: +P ) K ` N0 & +\ ) K ` S =+ 00 = H )'# 1 K # K I
YI
$$, 2 DE-
: # =+ ':0 +\ ) K ` A P ) K `0
4 =
H )'# 1 G':: F m
YI
$$E
?F& +P ) K ` \ ) K `0
H )'# 1 [M
W? F& Z
0 DD #
# :
?FL' [:: %
4 # # &
+ 3 ,
Y 2 > 2& :
g 3 NsP DtCr # #
# & $GI> $
; !
9 L M
h (
D ! !