WAP to calculate the Volume of a Sphere

Questions:
The volume of a sphere is given by the formula v = 4/3pr³. Given the value of the radius r, write a program to calculate the volume of a sphere.

Ans:    

      CLS

      pi = 3.141

      INPUT "Enter a radius" ; r

      v = 4/3*pi*r^3

      PRINT "The volume of a sphere :"; v

      END