Определить, принадлежит ли точка области плоскости, ограниченной линиями - Pascal ABC

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

Определить, принадлежит ли точка области плоскости, ограниченной линиями x2+(y-1)2=1, y=1-x2, y>=0

Код к задаче: «Определить, принадлежит ли точка области плоскости, ограниченной линиями - Pascal ABC»

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

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

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


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