Difference between revisions of "F90: Soma de dois números inteiros"
From AdonaiMedrado.Pro.Br
(New page: == Problema == Fazer um programa capaz de mostrar o resultado da soma de dois números inteiros. == Solução == <code lang="fortran"> PROGRAM aula2e2 IMPLICIT NONE INTEGER :: a, b WRIT...) |
(→Solução) |
||
| Line 3: | Line 3: | ||
== Solução == | == Solução == | ||
<code lang="fortran"> | <code lang="fortran"> | ||
| − | PROGRAM | + | PROGRAM aula1e2 |
IMPLICIT NONE | IMPLICIT NONE | ||
INTEGER :: a, b | INTEGER :: a, b | ||
| Line 11: | Line 11: | ||
READ (*,*) b | READ (*,*) b | ||
WRITE (*,*) "A soma de A+B é ",a+b | WRITE (*,*) "A soma de A+B é ",a+b | ||
| − | END PROGRAM | + | END PROGRAM aula1e2 |
</code> | </code> | ||
Latest revision as of 10:18, 9 September 2008
Problema
Fazer um programa capaz de mostrar o resultado da soma de dois números inteiros.
Solução
PROGRAM aula1e2 IMPLICIT NONE INTEGER :: a, b WRITE (*,*) "Digite o primeiro número: " READ (*,*) a WRITE (*,*) "Digite o segundo número: " READ (*,*) b WRITE (*,*) "A soma de A+B é ",a+b END PROGRAM aula1e2
