Помогите, пожалуйста) нужно написать программу (условие)для закрашенной области в...

Question

Помогите, пожалуйста)
нужно написать программу (условие)для закрашенной области в паскале
1-14 варианты

---

Comments

Много

---

ну хотя бы несколько

---

1 уже не надо

Answer 1

program mnoga;
var
  x, y: integer;
begin
read(x, y);
if ((y<0) and (sqr(x - 3) + sqr(y)<1) or ((y>0) and (y<2) and (sqr(x - 3) + sqr(y)>1))) then
  writeln('YES')
else
  writeln('NO')
end.

Comments

а это какой из вариантов?

---

Второй; ща третий зафигачу

---

ну ладно, не надо

---

спасибо и на этом:)