Advertisement
zrhans

meuprog.f90

Mar 22nd, 2016
306
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2. program meuprog
  3. integer x1
  4.  
  5. x1 = 2 + 3
  6.  
  7. if ( x1 .GT. 5) then
  8.      print*, 'maior que 5'
  9. else
  10.     print*,'x1=', x1
  11. end if
  12. read *
  13. end program meuprog
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement