https://adonaimedrado.pro.br/wiki/index.php?action=history&feed=atom&title=F90%3A_Rein%C3%ADcio_o_ciclo_DOF90: ReinÃcio o ciclo DO - Revision history2026-05-27T10:13:12ZRevision history for this page on the wikiMediaWiki 1.26.2https://adonaimedrado.pro.br/wiki/index.php?title=F90:_Rein%C3%ADcio_o_ciclo_DO&diff=719&oldid=prevAdonaimedrado: New page: <code lang="fortran"> PROGRAM aula IMPLICIT NONE INTEGER :: i = 0 DO i=i+1 IF (MOD(i,2)==0) CYCLE WRITE (*,*) i IF (MOD(i,15)==0) EXIT END DO END PROGRAM </code>2008-11-03T02:16:29Z<p>New page: <code lang="fortran"> PROGRAM aula IMPLICIT NONE INTEGER :: i = 0 DO i=i+1 IF (MOD(i,2)==0) CYCLE WRITE (*,*) i IF (MOD(i,15)==0) EXIT END DO END PROGRAM </code></p>
<p><b>New page</b></p><div><code lang="fortran"><br />
PROGRAM aula<br />
IMPLICIT NONE<br />
INTEGER :: i = 0<br />
DO <br />
i=i+1<br />
IF (MOD(i,2)==0) CYCLE<br />
WRITE (*,*) i<br />
IF (MOD(i,15)==0) EXIT<br />
END DO<br />
END PROGRAM<br />
</code></div>Adonaimedrado