Question

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

Answer 1

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

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