Автор - Gekxsan
отправь нарушение плис ошипся я не знаю
var
x, y, r: real;
begin
read(x, y, R);
if (x * x + y * y <= R * R) or
(y <= 0) and (y >= -2 * x) and (y >= 2 * (x - R)) then
write('попадает')
else
write('не попадает');
end.