clear; clc;

r = input("Enter r? ");

if r > 0
    A = r * r * pi;
    disp("Area = " + A);
else
    disp("Not a circle.");
end