Задача в турбо паскале
 

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

Помогите пожалуйста:
1. Решить задачу
2. Краткое словесное описание метода решения поставленной задачи.
3. Алгоритм выполнения задания в виде блок-схемы.
4. Исходный текст программы.
5. Выводы по результатам работы программы.

Задача:
Мишень представляет собой кольцо внутренним радиусом r , внешним радиусом R (центр кольца в начале координат). Стрелок произвёл 50 выстрелов по мишени. Определить процент попаданий в мишень, если известны координаты всех выстрелов: (x1, y1), (x2,y2),…(x50,y50).

Ответы присылайте пожалуйста здесь или на почту:
monax-93@list.ru

Заранее спасибо!

Выложите, пожалуйста, листинг в текстовом варианте. Чтобы сохранить форматирование (отступы, лесенки и т.п.) сделайте это в Расширенном режиме, после копирования выделите листинг и нажмите кнопку Код (#). А то, знаете, с FineReader'ом возиться как-то настроения нет.

P.S. А уж наворотили - конец света! Функции, процедуры, записи... А задачка-то на три строчки всего!