Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program questao03
- implicit none
- integer :: A = 2, B = 2, C = 5, D = 3, F = 3
- print*,'Resultado: ', A ** B * C + C / A - D ** F
- end program questao03
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement