[Delphi]

[software1988]

Ragazzi..se chiedo in input dei valore e poi voglio che questi man mano vengano memorizzati in un vettore che verrà ordina come in questa procedura, come faccio??

 procedure bubblesort(var V:vettore); 
var i,j:integer; scambio:boolean; 

   procedure scambia(var x,y:integer); 
     var aux:integer; 
     begin 
          aux:=x; x:=y; y:=aux; 
     end; 

begin   {Bubblesort} 
   for j:=1 to n-1 do 
     repeat 
      scambio:=false; 
        for i:=1 to n-1 do 
             if V[i]>V[i+1] then 
               begin 
             scambia(V[i],V[i+1]); 
                  scambio:=true; 
           end; 
     until scambio=false 
end;

[123delphi321]

non riesco a capire la domanda.

[pallinopinco]

non riesco a capire la domanda.

Anch'io ho difficoltà a capire quale sia il problema...

[mondobimbi]

se hai una applicazione console leggi sullo standard input e devi utilizzare l'istruzione readln che ti legge appunto una riga per volta sullo standard input. I valori letti li metti in una array che hai precedentemente dichiarato.
Se utilizzi una applicazione gui dipende dalla interfaccia che hai pensato, potresti introdurre i valori del vettore in una TListBox che puoi utilizzi per generare l'array per la routine di riordinamento (però in questo caso la TListBox ha questa funzione già implementata, oltretutto con algoritmi migliori).
ciao
sergio