составьте программу, проверяющую, лежит ли точка с заданными координатами вне круга

составьте программу, проверяющую, лежит ли точка с данными координатами вне круга с радиусом R и началом в точке O(a,b) Желая БЫ Приблизительно

Задать свой вопрос
1 ответ

var

 x, y, R, Oa, Ob: real;

 

begin

  writeln('Введите радиус окружности R');

  readln(R);

  writeln('Введите координаты центра окружности');

  readln(Oa, Ob);

  writeln('Введите координаты точки');

  readln(x, y);

  if (x gt; (Oa - R)) and (x lt; (Oa + R)) and (y  gt; (Ob - R)) and (y lt; (Ob + R)) then

    writeln('Точка с данными координатами лежит снутри круга')

  else

    writeln('Точка с заданными координатами лежит вне круга');

end. 

Если все верно, отметь решение как наилучшее)

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт