Come fare un loop in Fortran

Per realizzare una struttura ciclica ( loop ) in linguaggio Fortran posso utilizzare l'istruzione DO oppure DO WHILE.

DO CONTINUE / END DO

La struttura ciclica DO / CONTINUE realizza un ciclo definito di N iterazioni.

E' necessario indicare il numero di linea che conclude il blocco di istruzioni.

DO 100 I=1,10,2
WRITE(*,*) I
100 CONTINUE

In alternativa si può usare la forma con DO / END DO senza indicare il numero di linea.

DO I=1,10,2
WRITE(*,*) I
END DO

DO WHILE

Questa struttura ciclica compie un ciclo indefinito.

Il numero di iterazioni è legato al verificarsi o meno di un evento.

DO 100 WHILE ( I .LT. 10 )
WRITE(*,*) I
I=I+1 100
100 CONTINUE

Esiste anche una forma alternativa DO WHILE / END DO che mi permette di non indicare il numero di linea della fine del blocco.

DO WHILE ( I .LT. 10 )
WRITE(*,*) I
I=I+1 100
END DO

E così via.

 


 

Segnalami un errore, un refuso o un suggerimento per migliorare gli appunti

FacebookTwitterLinkedinLinkedin
knowledge base

Le strutture cicliche del Fortran