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
The Sum of the chain (fortran)
trapezna for
A program to calculate potential energy.
Example 45 175 page
A_01 SECANT_METHOD
Check identity matrix or not?
A_01 FIXED_POINT_IM(I)
Question1(b)
lcm and gcd using prime factorization
A_04 SIMPSON'S RULE (3(I))