Difference between revisions of "F90: Lendo de um arquivo"

From AdonaiMedrado.Pro.Br
Jump to: navigation, search
(New page: == Exemplo do conteúdo do arquivo aula.txt == 3 4 == Arquivo aula.f90 == <code lang="fortran"> PROGRAM aula IMPLICIT NONE INTEGER :: A,B OPEN (UNIT=10, FILE="aula.txt", STATUS="OLD"...)
 
 
Line 1: Line 1:
== Exemplo do conteúdo do arquivo aula.txt ==
 
3
 
4
 
 
 
== Arquivo aula.f90 ==
 
== Arquivo aula.f90 ==
 
<code lang="fortran">
 
<code lang="fortran">
Line 15: Line 11:
 
END PROGRAM aula
 
END PROGRAM aula
 
</code>
 
</code>
 +
 +
== Exemplo do conteúdo do arquivo aula.txt ==
 +
3
 +
4

Latest revision as of 15:01, 11 November 2008

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