Опубликовано 6 лет назад по предмету Информатика от ErnestoGoldwin1

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

Ответ

Ответ дан Аккаунт удален

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