Дана точка A с координ. X и Y, определить...

[Cullen]

Дана точка A с координ. X и Y, определить ее положение относительно кольца с R=2 и r=1

[B_N]

А центр кольца не указан что ли? В общем виде? Или это кольцо на котором заданы сложение с умножением?

1. Определить, принадлежит ли точка А окружности с радиусом r (с помощью уравнения окружности, естественно, с учетом координат центра кольца). Если да, то точка в "дырке" кольца - не принадлежит, если нет, то:
2. Определить, принадлежит ли точка окружности с радиусом R (аналогично п. 1) Если да, то точка принадлежит кольцу, если нет - не принадлежит.

[_Dmitry]

с:=sqrt(x*x+y*y);
if (с <= R) and (с >=r) then ... //точка в кольце

естественно, все это для кольца с центром в т.(0;0)

[Cullen]

Написал вот (вся программа), за центр окружности - начало координат:
Uses Crt;
var x,y,r1,r2:real;
begin
ClrScr;
writeln('Введите координаты точки A');
readln(x,y);
r1:=1; {внутренний радиус кольца}
r2:=2; {внешний радиус кольца}
if (x*x+y<=r2*r2) and (x*x+y*y>=r1*r1)
then writeln ('Точка А принадлежит кольцу')
else writeln ('Точка А не приандлежит кольцу');
readln;
end.

(можно и проще, так:
с:=sqrt(x*x+y*y);
if (с <= R) and (с >=r) then ... //точка в кольце )

Это все надо мне ввиде блок схем ( а я не помню уже как это все делается)

[puporev]

Вот набросал на скорую руку.

[Cullen]

ВСЕМ ОГРОМНОЕ СПАСИБО!!!