Bottom SciencePROGRAM factorial
IMPLICIT NONE
INTEGER::n,i,fact1=1
PRINT *, '============================================'
PRINT *, 'PROGRAM TO CALCULATE FACTORIAL OF A NUMBER [ BY WWW.BOTTOMSCIENCE.COM ]'
PRINT *, '============================================'
PRINT *, 'Enter a Number to Calculate it''s Factorial'
READ(*,*) n
DO i=1,n
fact1=fact1*i
END DO
PRINT *,'Factorial is',fact1
END PROGRAMOUTPUT
Fortran Programming
Numerical Methods
- Bisection Method
- Regula Falsi (False Position)
- Newton Raphson Method
- Secant method
- Newton Raphson – Non-Linear Equations
- Gauss Elimination Method
- Gauss Elimination Method (With Pivoting)
- Gauss Jordan Method
- Gauss Elimination – Determinant
- Gauss Jordan – Inverse Matrix
- Lagrange Interpolation
- Newton Divided Interpolation
- Newton Forward Interpolation
- Least Square Fitting
- Trapezoidal Rule
- Simpson 1/3rd Rule
- Simpson 3/8 Rule
- Euler’s Method
- Euler’s Modified Method
- Runge Kutta’s (2nd Order)
- Runge Kutta’s (4th Order)
