Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
DO END DO
program DO_END_DO real :: Q, DP Q = 750 DP = 1500 WRITE(*,*)" Q : HP" WRITE(*,*)"" DO Q = 750,0,-150 HP = (DP*Q)/1714 WRITE(*,*) Q, HP END DO END PROGRAM
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Title
SIUM(3.5)
simpsonova for
euler-cromer
New3
euler-cromer
Input Output formatting
y
Fibonacci 500
prime list 2
Please log in to post a comment.