Buonasera,
è la prima volta che inserisco una discussione su questo forum e inoltre sono un neofita in programmazione.
Sto lavorando in fortran ,il mio prof ha chiesto un algoritmo per la ricerca sequenziale della posizione di un numero.
Io ho provato a creare l'algoritmo l'avvio funzione, cioè non sono presenti errori ma mi restituisce sempre lo stesso valore, che è lo zero.
Vi riporto circa il mio algoritmo.
program ricercasequenziale
integer::n,pos,i
real:: elenco (50)
real:: 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
Spero vivamente in una risposta.
Cordiali saluti.