F90: Potências de 2

From AdonaiMedrado.Pro.Br
Revision as of 01:48, 28 August 2008 by Adonaimedrado (Talk | contribs) (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 ...)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

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