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
Shooting P1
Jacobi
DO WHILE DO
A_04 TRAPEZOIDAL RULE (3(I))
Fyyh
IF GO TO
A_01 FIXED_POINT_IM(I)
5
SIUM(3.7)
Find HM