https://adonaimedrado.pro.br/wiki/index.php?action=history&feed=atom&title=F90%3A_Introdu%C3%A7%C3%A3o_aos_vetoresF90: Introdução aos vetores - Revision history2026-05-27T07:50:59ZRevision history for this page on the wikiMediaWiki 1.26.2https://adonaimedrado.pro.br/wiki/index.php?title=F90:_Introdu%C3%A7%C3%A3o_aos_vetores&diff=571&oldid=prevAdonaimedrado: New page: <code lang="fortran"> PROGRAM aula IMPLICIT NONE INTEGER :: Vetor(5), i = 0 WRITE (*,*) "Digite 5 números inteiros entre 0 e 999" DO i = 1, 5 READ (*,*) Vetor(i) END DO DO i = 1...2008-10-04T05:31:05Z<p>New page: <code lang="fortran"> PROGRAM aula IMPLICIT NONE INTEGER :: Vetor(5), i = 0 WRITE (*,*) "Digite 5 números inteiros entre 0 e 999" DO i = 1, 5 READ (*,*) Vetor(i) END DO DO i = 1...</p>
<p><b>New page</b></p><div><code lang="fortran"><br />
PROGRAM aula<br />
IMPLICIT NONE<br />
INTEGER :: Vetor(5), i = 0<br />
<br />
WRITE (*,*) "Digite 5 números inteiros entre 0 e 999"<br />
DO i = 1, 5<br />
READ (*,*) Vetor(i)<br />
END DO<br />
<br />
DO i = 1, 5<br />
WRITE (*,"(I3.3)") Vetor(i)<br />
END DO<br />
END PROGRAM aula<br />
</code></div>Adonaimedrado