% Compute surface area of a sphere
% r: radius of the sphere [units]
% A: surface area of the sphere [units^2]

r= input('Enter the radius: ');
A= 4*pi*r*r;
fprintf('Surface area is %f units^2\n', A)
