Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
problem_4
PROGRAM CONVERGE IMPLICIT NONE REAL:: X0,Y0,X,Y INTEGER::k,n X0=4.4; Y0=1; n=5; DO k=1,n X=SQRT(7.0-Y0) Y=SQRT(X0-4) X0=X Y0=Y PRINT*,X,Y IF(SQRT(X0-4.0)<0) THEN PRINT*,"Converge" ELSE PRINT*,"Not Converge" END IF END DO END PROGRAM
run
|
edit
|
history
|
help
0
finitos
Rvc new
A_01 QN:3
A_03 EULER'S METHOD
False position
Question1(b)
Secant Method
Shooting
lcm and gcd using prime factorization
A_02 questions 3