Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
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
Fyyh
points on,inside circle
Fib series
Formatted Output 001
euler-cromer
Backward
C
Finite
euler-cromer
A_02 questions 3