Проверить принадлежит ли точка, заданная координатами, заштрихованной области - Pascal ABC (14118)

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

Проверить принадлежит ли точка, заданная координатами, заштрихованной области. Вывести на экран TRUE или FALSE.

Код к задаче: «Проверить принадлежит ли точка, заданная координатами, заштрихованной области - Pascal ABC (14118)»

textual
var x,y:real;
    f:boolean;
begin
writeln('Введите координаты точки x,y');
readln(x,y);
f:=(x*x+y*y<=1)and(x*y<=0)and(abs(x)+abs(y)>=1);
write(f);
end.

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


СОХРАНИТЬ ССЫЛКУ