F90: Divisão de dois números inteiros
From AdonaiMedrado.Pro.Br
Revision as of 01:43, 28 August 2008 by Adonaimedrado (Talk | contribs) (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, ...)
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