F90: Lendo de um arquivo
From AdonaiMedrado.Pro.Br
Arquivo aula.f90
PROGRAM aula IMPLICIT NONE INTEGER :: A,B OPEN (UNIT=10, FILE="aula.txt", STATUS="OLD") READ (10,*) A READ (10,*) B WRITE (*,*) A+B CLOSE (10) END PROGRAM aula
Exemplo do conteúdo do arquivo aula.txt
3 4