*Nota: Il seguente articolo è realizzato per illustrare le basi della programmazione in Fortran,se volete imparare approfonditamente il linguaggio è necessario studiarlo.
Il fortran è il primo linguaggio di programmanzione ad alto livello,progettato principalmente per il calcolo numerico scientifico. La prima versione fu sviluppata da John Backus nel 1957,ma ovviamente ne esistono versioni molto più recenti,la cui ultima è il Fortran 2008. Le più recenti sono progettate anche per il calcolo parallelo,già a partire dalla versione Fortran 95. Il Fortran è stato inoltre uno dei primi linguaggi di programmazione compilati.
Come già detto,il Fortran è un linguaggio usato soprattutto per il calcolo scientifico e numerico,in particolare nell'ambito della simulazione dei fluidi,studio del comportamento delle particelle e metereologia.
Le strutture presenti nel Fortran attualmente sono simili a quelle del C. Inoltre anche il Pascal era stato originariamente proggettato per la programmazione scientifica.
Poiché il Forttran è stato pensato principalmente per il calcolo scientifico e numerico,alcuni comandi consentono di effettuare operazioni matematiche sui vettori numerici, elemento d'ausilio nel calcolo parallelo. Per questo motivo è il linguaggio più usato per i programmi usati su i supercomputer,come per esempio quelli usati in metereologia. Delle innovazioni nella sintassi sono state introdotte a partire dal Fortran 90,come l'allocazione dinamica della memoria.
Alcune delle parole chiave del Fortran sono analoghe ad altri programmi come "if";"then";"end";"do" oppure "goto".
Il Fortran è molto cambiato nella versione 95,nella quale sono state inserite molte più possibilità e una sintassi meno rigida rispetto allle versioni precedenti.
Ovviamente,essendo il Fortran un linguaggio compilato,è necessario istallare un compilatore per programmare.
Per scrivere "Hello World"in Fortran è necessario inserire nel compilatore:
PROGRAM HELLO
PRINT *, 'Hello World'
END
Un esempio di programma in Fortran per trovare il massimo valore in un elenco numerico è il seguente:
(fortran 95 in poi)
program trovamax
real :: a(1000),amaxa
integer ::N,i,,imax
read (1,*) N
read (1,'5(f10.0)) (a(i),i=1,N) amaxa=-1e20 ; imax=-99999 search: do i=1,n if (a(i)>=amaxa) then amaxa=a(i) ; imax= i end do search write (*,*) 'AMAXA,I=',amaxa,i stop end program trovamax
Attornado 11/05/2014
Scrivi commento