Difference between revisions of "F90: O uso do DIMENSION"

From AdonaiMedrado.Pro.Br
Jump to: navigation, search
(New page: <code lang="fortran"> PROGRAM aula INTEGER :: i INTEGER, DIMENSION(10) :: a WRITE (*,*) "Digite 10 números" READ (*,*) (a(i),i=1,10) WRITE (*,*) "Seus 10 numeros foram:" WRITE (*,"(...)
 
(No difference)

Latest revision as of 00:30, 28 October 2008

PROGRAM aula
	INTEGER :: i
	INTEGER, DIMENSION(10) :: a
	WRITE (*,*) "Digite 10 números"
	READ (*,*) (a(i),i=1,10)
	WRITE (*,*) "Seus 10 numeros foram:"
	WRITE (*,"(I3)") (a(i),i=1,10)
END PROGRAM aula