Tablouri unidimensionale (vectori)

Tablouri unidimensionale (vectori)

   Un tablou (array) este o structura formata dintr-un numar fixat de componente de acelasi tip, numit tip de baza.

Sintaxa
type id_de_tip_tablou = array[tip_ordinal] of tip_de_baza

   Citirea unui vector

for i:=1 to n do
begin
   Write('Dati x[',i,']=');
   ReadLn(x[i])
end;

   Scrierea unui vector

for i:=1 to n do
   Write(x[i],' ');

   Inversarea unui vector intr-un alt vector

Vom inversa vectorul x in vectorul y, de acelasi tip cu x
for i:=1 to n do y[i]:=x[n+1-i]

   Inversarea unui vector in el insusi

for i:=1 to n div 2 do
begin
   aux:=x[i];
   x[i]:=x[n+1-i];
   x[n+1-i]:=aux
end;

   Afisarea elementelor impare de pe pozitii pare ale unui vector de numere intregi

for i:=1 to n do
   if (not odd(i)) and odd(i) then
      WriteLn(x[i])

   Inserarea unui element intr-un vector

Sa inseram pe pozitia p un element nou m. n este numarul de elemente ale vectorului.

for i:=n+1 downto p+1 do
   x[i]:=x[i-1];
x[p]:=m;
n:=n+1;