Hozzáférés Array Elements
Tekintsük a javasolt program töredékek megoldásait az alábbi néhány gyakori probléma.
Feladat. Cserélje ki a negatív elemek az ellenkező jel.
Leírni ezt az eljárást. Ő majd át egy paraméter - egy tömb, amely az eredménye annak végrehajtását, mivel néhány elem lehet cserélni.
Eljárás Zamena (Var m myArray; n :. Egész szám);
var
i. integer;
kezdődik
i: = 1-től n-do
ha m [i] <0
majd
m [i]: = -1 * m [i];
Vége;
Feladat. Keresse és jelenítse meg a számát még elemekkel.
Eljárás PoiskChet (m myArray; n :. Egész szám);
var
i. integer;
kezdődik
i: = 1-től n-do
ha m [i] mod 2 = 0
majd
Írása (i: 5);
Vége;
Feladat. Keresse meg a számos pozitív és negatív elemek a tömbben.
Nézzük ismertesse az eljárást, ami küld három paraméter - a tömb és a két számláló, az egyik példány nagyobb nullánál, és a második - a negatív elemek.
Eljárás OtrPol (m myArray ;; n :. egész; Var K1, K2 egész.);
var
i. integer;
kezdődik
K1: = 0;
k2: = 0;
i: = 1-től n-do
ha m [i]> 0
majd
Inc (k1)
más
ha m [i] <0
majd
Inc (k2);
Vége;
Van valami ebben a tömbben elemek az ingatlan?
Ahhoz, hogy megoldja ezeket a problémákat, hogy sokkal kényelmesebb használni a ciklus feltételeknek, és a funkció, melynek eredménye egy logikai.
Feladat. Van negatív elem a tömbben?
Funkcióvezérlés (m myArray; n :. egész szám). logikai;
var
i. integer;
kezdődik
i: = 1;
míg a (I<=n) and (m[i]>0) do
Inc (i);
Vezérlés: = (i<=n);
Vége;
Feladat. Válassza a tanár feladata az önálló döntés.
- Dan-dimenziós tömb. Keresse meg a különbség a legnagyobb és a legkisebb szám a tömbbe.
a) A [i] b) A [i] = B [i];
a) A [i]> B [i].