Solver To calculate Surface area of a sphere

Source code of 'To calculate Surface area of a sphere'

This Solver (To calculate Surface area of a sphere) was created by by chillaks(0)

: View Source, Show, Put on YOUR site
About chillaks: am a freelancer

==section input
The Surface Area of a Sphere of radius *[input radius=5] is.

==section solution
perl
if($radius<=0)
{
print " Please enter the value greater than 0 to calculate surface area of sphere";
}
else{
my $area=4*$radius*$radius*3.14159265;

print "
<A HREF=Geometry-Surface-Area-and-Volume.lesson> Geometry Surface Area and Volume of 3 Dimensional Figures</A>
The Formula for Surface area Sphere is
{{{Area=4*pi*radius*radius}}}
{{{Area=4*pi*$radius*$radius=$area}}}

Hence, The Surface Area of Sphere of radius $radius is $area.

For more on this topic, See the lessons on <A HREF=http://www.algebra.com/algebra/homework/Surface-area/Lessons.html>Geometry: Area and Surface Area</A>

Some more is on <A HREF=http://www.algebra.com/algebra/homework/Surface-area/Surface-Area-and-Volume.lesson> Surface Area and Volume</A> and <A HREF=http://www.algebra.com/algebra/homework/Surface-area/Perimeter-and-Area.lesson> Perimeter and Area</A>.

";
}

==section output
area,

==section check
 radius=6 area=452.389342