Решить задачку с объяснением

Соединим данные точки и получим отрезок, длина которого одинакова радиусу окружности. Длина этого отрезка рассчитывается по знаменитому выражению r = (x-x)+(y-y)
Затем находим площадь круга S=r и длину окружности C=2r

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программка не работает, обновите версию!

begin
  var (x1,y1):=ReadReal2('Координаты центра x1 и y1:');
  var (x2,y2):=ReadReal2('Координаты точки на окружности x2 и y2:');
  var r:=Sqrt(Sqr(x2-x1)+Sqr(y2-y1));
  var (S,C):=(Pi*r*r,2*Pi*r);
  Writeln('S=',S,', C=',C)
end.

Пример
Координаты центра x1 и y1: 3 3.5
Координаты точки на окружности x2 и y2: 1.7 -2.8
S=129.999104005546, C=40.4180271718983