Difference between revisions of "F90: Problema do número dentro de uma faixa"
From AdonaiMedrado.Pro.Br
(New page: == Problema == Fazer um programa capaz de identificar se um número está ou não contido em uma determinada faixa (limite fechado) de valores. Exemplo: sendo a faixa [2,10] o número 5 p...) |
(No difference)
|
Latest revision as of 02:09, 28 August 2008
Problema
Fazer um programa capaz de identificar se um número está ou não contido em uma determinada faixa (limite fechado) de valores.
Exemplo: sendo a faixa [2,10] o número 5 pertence a faixa?
Solução
PROGRAM aula1e6 IMPLICIT NONE INTEGER :: a, b, n WRITE (*,*) "Digite o limite inferior:" READ (*,*) a WRITE (*,*) "Digite o limite superior:" READ (*,*) b WRITE (*,*) "Digite um número:" READ (*,*) n IF (n>=a .AND. n<=b) THEN WRITE (*,*) "Número dentro da faixa." ELSE WRITE (*,*) "Número fora da faixa." END IF END PROGRAM aula1e6