Štruktúrovaný (zložený) typ POLE

type pole = array[typ_indexu] of typ_prvkov;

• všetky prvky poľa sú rovnakého typu = pole sa skladá z veľa "jednoduchších" premenných
• tieto premenné sú prístupné cez index (selektovanie)

• typ_indexu - ľubovoľný ordinálny typ
• typ_prvkov - ľubovoľný typ

pr.: cisla:array [1..10] of integer;

• počet prvkov poľa musí byť známy pri kompilácii
• všetky prvky poľa sa nedajú naraz načítať ani vypísať jediným príkazom read, write - treba to rozpísať, napr. pomocou for-cyklu

const
  max=7;
type
  index=1..max;
  pole=array[index] of integer;
var
  p:pole;
  i:index;
  s:integer;
  t:TextFile;
begin
  AssignFile(t,'text.txt'); Reset(t);
  for i:=1 to max do read(t,p[i]);
  CloseFile(t);
  AssignFile(t,'vypis.txt'); Rewrite(t);
  s:=0;
  for i:=1 to max do inc(s,p[i]);
  writeln(t,'Priemer: ',s/max:0:2);
  for i:=1 to max do
    if p[i]<s/max then writeln(t,p[i],' pod')
    else if p[i]>s/max then writeln(t,p[i],' nad')
    else writeln(t,p[i],' priemer');
  CloseFile(t);
end;

poznámka:

• funkcia high - vráti pre pole maximálny index, pre ordinálny typ vráti maximálnu hodnotu

• funkcia low - vráti pre pole minimálny index, pre ordinálny typ vráti minimálnu hodnotu

• funkcia length funguje len pre pole a string - pre pole vráti počet prvkov, pre string momentálnu dĺžku

návrat