Э. А. Абдыкеримова

Элементтерді таңдау арқылы сҧрыптау

жүктеу/скачать 1,31 Mb.

Pdf көрінісі

бет	105/134
Дата	31.01.2022
өлшемі	1,31 Mb.
	#116510

1 ... 101 102 103 104 105 106 107 108 ... 134

Байланысты:
Э.А.Абдыкеримова.ИНФОРМАТИКАНЫҢ ТЕОРИЯЛЫҚ НЕГІЗДЕРІ

13.3 Элементтерді  таңдау арқылы  сҧрыптау


Мысалы.

n  элеменссен  сұрасын
A
  рандар  марриві  берілген.  Оны  саңдат
әдірін қолданып элеменссерінің  өрті бойынша рұрыпсаңдар

Program  Prost_4;
const  n=8;
type   MasType = array [1..n]  of  іnteger;
var   і, іdx, k:  іnteger;            A:  MasType;
Functіon  MіnMas(j: іnteger): іnteger;
       var  p, mіn: іnteger;
begіn       for p:=j  to  n  do
іf  (p=j) or (A[p]       MіnMas:=mіn;    end;
begіn   Randomіze; Wrіteln(‗Берілген сандар массиві:‘);
For і:= 1 to n do  begіn  A[і]:=Random(30); Wrіte(A[і]:4); end;  For і:=1 to n-1
do
        begіn     іdx:=MіnMas(і);
            k:=A[і]; A[і]:=A[іdx]; A[іdx]:=k;   end;
     Wrіteln; Wrіteln(‗Ӛсуіне қарай сҧрыптау нәтижесі:‘);
    For і:=1 to n do Wrіte(A[і]:4);    Readln;end.

95
Бҧл  программада  берілген  массив  бӛлігінің  ең  кіші  элементінің  индексін
(рет  нӛмірін)  табатын  MіnMas(j)  функциясы  пайдаланылған.  Функцияның  j
параметрінің мәні массив бӛлігінің бірінші элементінің рет нӛмірін (соңғысы n)
кӛрсетеді.

жүктеу/скачать 1,31 Mb.

Достарыңызбен бөлісу:

1 ... 101 102 103 104 105 106 107 108 ... 134