Ricerca sequenziale.

[galles90]

Buongiorno,
devo produrre un algoritmo in linguaggio FORTRAN per la ricerca sequenziale della posizione di un numero in un elenco di numeri reali di lunghezza N.
Nel seguente codice, sotto riportato, è l'algoritmo fatto da me.

In dettaglio, mando in esecuzione l'algoritmo, non si presentano errori l'unica cosa che mi restituisce sempre il valore $0$. Spero nella risposta di qualcuno che mi potrebbe dare qualche dritta per individuare gli errori.

Code:

program ricerca
integer:: i,n,pos
real:: elenco(10),x
read*,n
pos=0
i=1
do 
	if(elenco(i)==x) then
	pos=i
	end if
i=i+1
if(pos/=0 .or. i>n) exit
end do 
print*,pos
end

Questo è il mio terzo topic, dove nei precedenti non ho ricevuto risposte, inerenti all'informatica.
Mi chiedo: c'è qualcosa nei miei argomenti che non risultano chiari, oppure è il tipo di linguaggio che non viene preso in considerazione ?

Buona giornata.

[apatriarca]

Ma elenco e x dove vengono inizializzati/settati? Riguardo al motivo per cui non hai mai ricevuto risposte credo che il problema sia in effetti il linguaggio che non molti conoscono..