Skip to content

Instantly share code, notes, and snippets.

@zrhans zrhans/op_aritmetica.f90
Last active Apr 25, 2017

Embed
What would you like to do?
program op_aritmetica
! Este programa efetua um cálculo aritmético
!
implicit none
! declaração de variáveis
integer :: a, b, c
! atribuindo valores
a = 5
b = 3
! Exponenciação
c = a ** b
! Mostrando o resultado
print *, "c = ", c
! Multiplicação
c = a * b
! resultado
print *, "c = ", c
! Divisão
c = a / b
! resultado
print *, "c = ", c
! Adição
c = a + b
! resultado
print *, "c = ", c
! Subtracão
c = a - b
! resultado
print *, "c = ", c
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.