RosettaCodeData/Task/Fibonacci-sequence/Fortran/fibonacci-sequence-6.f
2023-07-01 13:44:08 -04:00

7 lines
117 B
Fortran

program fibTest
use fibonacci
do i = 0, 10
print *, fibr(i), fibi(i)
end do
end program fibTest