Do you know the algorithm for simple pascal programm for calculating the surface area of a sphere?

please make it simple if you do. thanks

The algorithm to calculate surface area has NOTHING to do with pascal. Have a quick read through this and you should be able to do your thing.
Link : http://en.wikipedia.org/wiki/Sphere#Surface_area_of_a_sphere

I hope this is not what they're assigning to Comp Sci students oh. 

@Mobinga, absoultely not,

@Fayimora, thanks but thats not exactly what i want. I am trying to run this program on a pascal compiler, it doesnt run, and i want to know what am doing wrong, that is why i said ", simple pascal program"
so if you do have a source code for this simple program, please drop it

Post the code, so that we can correct it for u. I'm a pascal programmer and using freepascal and lazarus ide. If u dont have a code, i can write this for u, for the formula above but i havent tested it, so i dont know if it will work,but try and see if it works.

Program formula;
var
A,r:integer;
begin
{get the radius}
readln(r);
A:=4*pi*power(r);
{display the result}
writeln(A);
{wait for key press before exiting}
readln;
end.

bobbyray:

Do you know the algorithm for simple pascal programm for calculating the surface area of a sphere?

please make it simple if you do. thanks

What?!!
Mods, ban this dude!!! . . .Like Forever!