Difference between revisions of "F90: Potências de 2"

From AdonaiMedrado.Pro.Br
Jump to: navigation, search
(New page: == Problema == Fazer um programa capaz de exibir a pontência de 2 para um expoente informado pelo usuário. == Solução == <code lang="fortran"> PROGRAM aula1e4 IMPLICIT NONE INTEGER ...)
 
(Solução)
 
Line 8: Line 8:
 
INTEGER :: a
 
INTEGER :: a
 
WRITE (*,*) "Digite o expoente: "
 
WRITE (*,*) "Digite o expoente: "
READ(*,*) a
+
READ (*,*) a
 
WRITE (*,*) "O número 2 elevado a ",a," é igual a ",2**a
 
WRITE (*,*) "O número 2 elevado a ",a," é igual a ",2**a
 
END PROGRAM aula1e4
 
END PROGRAM aula1e4
 
</code>
 
</code>

Latest revision as of 01:49, 28 August 2008

Problema

Fazer um programa capaz de exibir a pontência de 2 para um expoente informado pelo usuário.

Solução

PROGRAM aula1e4
	IMPLICIT NONE
	INTEGER :: a
	WRITE (*,*) "Digite o expoente: "
	READ (*,*) a
	WRITE (*,*) "O número 2 elevado a ",a," é igual a ",2**a
END PROGRAM aula1e4