Даны два круга с центрами в начале координат с радиусами R1 , R2 ( R1 > R2) . Определить , принадлежит ли точка с координатами ( x , y ) образованному кругами кольцу — QBasic(Бейсик) — Справочник разработчика. Приемная комиссия

INPUT r1
INPUT r2
IF ABS(x) < r1 AND ABS(x) > r2 AND ABS(y) < r1 AND ABS(y) > r2 THEN PRINT "yes" ELSE PRINT "no"

Тестирование выполнено в программе QB64 ( Скачать )