LP - Vetor - Pascal

Program Vetor;
Var 
    vet:array[1..6] of integer; 
Begin 
    vet[1]:=90; 
    vet[2]:=60; 
    vet[3]:=70;         
    vet[4]:=45; 
    vet[5]:=30; 
    vet[6]:=80;     
end.