Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- C Hey there kids- guess what time it is!
- C That's right, it's FORTRAN TIME:
- i = 0
- j = 40 + 2
- dimension k(5)
- k(1) = 333
- k(4) = 999
- C We are gonna do HELLA arithmetic and logic:
- 10 print i, k(i)
- i = i + 1
- go to 20
- print j
- 20 if (i > 10) 30, 10
- 30 stop
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement