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
Ashish.txt
Rvc new
expx
Ashish.txt
A_02 questions 3
G b
Currency conversion
Practice 4 I
Check identity matrix or not?
euler-cromer