если я правильно тебя понял, то это будет выглядеть примерно так:

var
R:real;//переменная с радиусом
P:real;//число Пи
S:real;//площадь
begin

R:=значение радиуса;
P:=3.14;
S:=P*R^2;//вычисляем площадь

end;

а вообще площади окружности не бывает, бывает длинна окружности и площадь круга...