c     Example program from class on 9/2/10
      program c2p1

      implicit none

      real x,j,k

      print *, 'Enter x'
      read *, x
      print *, x

      X = 4
      print *, x

      print *, 'Enter radius'
      read *, j

      k = 3.1415*j*j

      print *, 'Area = ', k

      end