Area of a Circle | FORTRAN 95

Area of a Circle | FORTRAN 95

PROGRAM circle_area
  IMPLICIT NONE
  REAL::radius,pi=3.141,area
  WRITE(*,*) '============================================'
  WRITE(*,*) 'PROGRAM TO CALCULATE AREA OF A CIRCLE [ BY WWW.BOTTOMSCIENCE.COM ]'
  WRITE(*,*) '============================================'
  WRITE(*,*) 'ENTER THE RADIUS OF THE CIRCLE'
  READ(*,*) radius
  area=pi*radius**2
  WRITE(*,*)"Area of the Circle is = ",area
END PROGRAM

OUTPUT

1. AREA OF A CIRCLE - OUTPUT - FORTRAN 95
AREA OF A CIRCLE – OUTPUT – FORTRAN 95

Leave a Reply

Your email address will not be published.