Difference between revisions of "F90: Divisão de dois números inteiros"
From AdonaiMedrado.Pro.Br
(New page: == Problema == Fazer um programa capaz de mostrar a resposta da divisão entre dois números inteiros. == Solução == <code lang="fortran"> PROGRAM aula1e3 IMPLICIT NONE INTEGER :: a, ...) |
(No difference)
|
Latest revision as of 01:43, 28 August 2008
Problema
Fazer um programa capaz de mostrar a resposta da divisão entre dois números inteiros.
Solução
PROGRAM aula1e3 IMPLICIT NONE INTEGER :: a, b WRITE (*,*) 'Digite o dividendo: ' READ (*,*) a WRITE (*,*) 'Digite o divisor: ' READ (*,*) b WRITE (*,*) 'A divisão inteira de a por b é igual a ', a/b END PROGRAM aula1e3