Принадлежит ли точка с заданными координатами заштрихованной области - Turbo Pascal
Формулировка задачи:
Здравствуйте.Помогите мне определить,принадлежит ли точка с заданными координатами заштрихованной области.
Решение задачи: «Принадлежит ли точка с заданными координатами заштрихованной области»
textual
Листинг программы
if(x>=0)and(x*x+y*y>=9)and(x*x+y*y<=25) then write('Yes') else write('No');
Объяснение кода листинга программы
- Переменная
x
принимает значение координаты первой точки. - Переменная
y
принимает значение координаты второй точки. - Вычисляется площадь заштрихованной области:
x*x + y*y
. - Вычисляется радиус заштрихованной области:
sqrt(x*x + y*y)
. - Проверяется условие принадлежности точки заштрихованной области:
x >= 0
иx*x + y*y >= 9
иx*x + y*y <= 25
. - Если условие выполняется, то выводится ответ 'Yes'.
- Если условие не выполняется, то выводится ответ 'No'.