1 2 3 4 5 6 7 8 9 10 11 | !write a FORTRAN program that reads a radius of a circle & print its area !The program finds area of a circle program area_circle implicit none real, parameter::pi=3.1416 real::area,r print*,'Enter the value of radius=' read*,r area=pi*r**2 print*,'Area of the circle=',area end program area_circle |
No comments:
Post a Comment