|
VECTORI
type v=array [1..100] of integer;
var a,b:v;
ex: var vector:array [1..10] of 0..2;
vector:array ['a'..'z'] of boolean;
Accesarea unui element:
vector[5]:=1;
vector2['e']:=false;
Incarcarea unui vector
program incarcare_vector;
var v:array [1..50] of integer;
i,n:1..50;
begin
write('Dati numarul de elemente <=50');
readln(n);
for i:=1 to n do begin
write('v[',i,']=');
readln(v[i]);
end;
readln
end.
Tiparirea unui vector
Dupa incarcarea unui vector, acesta se poate tipari.
Tiparirea se face element cu element.
for i:=1 to n do writeln('v[',i,']=',v[i]);
v[1]=15
v[2]=3
v[3]=4
.
.
.
.
.
Intr-un tip de data vector,elementele se pot repeta spre deosebire de multimile din matematica in care fiecare element apare o singura data.
Nu se va tipari sau face calcule cu elemente care nu au primit in prealabil valoare.
var a:integer;
begin
write(a);
end.
-este un contraexemplu, deoarece a este o variabila intreaga neinitializata nu se va tipari.
Sortarea unui vector
-a sorta un vector inseamna a aranja elementele vectorului in ordine crescatoare sau descrescatoare (ordonare alfabetica, sau invers alfabetica care se numeste ordonare lexico-grafica).
(1,3,1,2,5)
.
.
sortare
(1,1,2,3,5)
(c,f,a,j)
.
.
sortare
(a,c,f,j)
Ordonarea lexico-grafica este la fel ca ordonarea cuvintelor dintr-un dictionar.
v(3 1 5 7)
. . . .
. . . .
v[1] v[2] v[3] v[4]
aux:=v[1];
v[1]:=v[2];
v[2]:=aux;
Ordonare prin interschimbare
Algoritmul ordonarii prin interschimbare este:
a)Pentru toti i=1, n-1
compar toti v[i] cu v[i+1]
Daca v[i+1]max then
max:=v[i];
write('max=',max);
end.
program max_min;
var v:array [1..100] of integer;
n,i,min,max:integer;
begin
write('n=');readln(n);
for i:=1 to n do begin
write('v[',i,']=');
readln(v[i]);
end;
max:=v[1];min:=v[1];
for i:=2 to n do begin if v[i]>max then max:=v[i]
if v[i]
|