Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Rand
REAL X(10000) N=5000 DO I=1,N X(I)=RAND() END DO S=0 DO I=1,N S=S+X(I) S1=S1+X(I)*X(I) END DO S1=S1/N S=S/N D=SQRT(S1-S*S) WRITE(*,*)'MEAN IS',S,D END
run
|
edit
|
history
|
help
0
my_second_code
A_03 ADAMS BASHFORTH S4
রাবেয়া সরকার রিমা 💙💚💛
fortran-genetic-algo
exercise
A_02 GUASSIAN_ELIMINATION METHOD
A_01 FIXED_POINT_IM(I)
Currency conversion
Shooting method
Secant Method