Определить, попадает ли точка с заданными координатами в область, закрашенную на рисунке серым цветом - Pascal ABC (14577)

Формулировка задачи:

Написать программу,которая определяет, попадает ли точка с заданными координатами в область, закрашенную на рисунке серым цветом. Результат работы программы вывести в виде текстового сообщения. Буду очень благодарна за помощь

Код к задаче: «Определить, попадает ли точка с заданными координатами в область, закрашенную на рисунке серым цветом - Pascal ABC (14577)»

textual
var r,x,y:real;
begin
write('R=');
readln(r);
writeln('Введите координаты точки');
readln(x,y);
if (x*x+y*y<=r*r)and(abs(y)>=abs(x)) then write('Точка попадает в область')
else  write('Точка не попадает в область')
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

5   голосов, оценка 4.800 из 5


СДЕЛАЙТЕ РЕПОСТ