Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
evaluation
!gfortran, gcc version 7.4.0 program hello implicit none integer::n real::s=0.0,m=1.0,i n=10; do i=1,n s=s+(sqrt(i))/(i**2+1); end do print'(A15)','summation value :' print*,s do i=1,n m=m*((i-1)**2)/(sqrt(i)); end do print'(A15)','product value :' print*,m end program hello
run
|
edit
|
history
|
help
0
4(ii)
A_01 NEWTON_RM(B(I))
Rand
A_01 NEWTON_R_M(B(I))
my_second_code
NEWTON SECOND LAW
ANIRUDDHA
Vi ss. F
A_01 FIXED_POINT_IM(II)
Title