Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Fib series
Program fibici Implicit none Real j,k,fib,N Integer i J=-1 k=1 N=10 fib=0 100 continue fib=j+k J=k K=fib i=i+1 Write(*,*) fib If(I .le. 10) goto 100 End program fibici
run
|
edit
|
history
|
help
-1
ANIRUDDHA
Finding trace
problem_3
Practice 2(I)
Practice 2(I)
Ashish.txt
Rand
C
Shooting P1
3