Guide

L’esecuzione di una istruzione READ inizia sempre alla ricerca di valori di input con una nuova linea di ingresso:

INTEGER :: I, J, K, L, M, N

READ(*,*) I, J
READ(*,*) K, L, M
READ(*,*) N

I dati di input di una tale sequenza potrebbero essere:

100 200
300 400 500
600

in questo modo le varibili I, J, K, L, M, N riceveranno i valori 100, 200, 300, 400, 500 e 600, rispettivamente.

Di conseguenza, se il numero di valori di input è più grande del numero di variabili in una dichiarazione READ, i valori extra saranno ignorati. Considerare quanto segue:

INTEGER :: I, J, K, L, M, N

READ(*,*) I, J, K
READ(*,*) L, M, N

Se i dati di input sono:

100 200 300 400
500 600 700 800
900

Le variabili I, J, K riceveranno i valori 100, 200 e 300, rispettivamente. Poiché la seconda istruzione READ inizia con una nuova linea, L, M ed N riceveranno 500, 600 e 700, rispettivamente mentre il valore 400 presente nella prima linea in ingresso è perduto.Il prossimo READ inizierà a leggere con la terza linea, raccogliendo 900. Quindi, 800 sarà allo stesso modo perduto.

Link correlati all’argomento

- Programmare con Fortran

- Note sul Fortran 90

- Come scaricare gratuitamente il compilatore Fortran

- Gli articoli della guida Fortran