clear; clc;

r = input('Enter r? ');
if r > 0
    A = r * r * pi
else
    disp('r <= 0.');
end