Площадь кольца вычисляется по формуле :
Тут
R - внешний радиус кольца
r - внутренний радиус
Кстати в самом Турбо паскале обзначения R и r не прокатят, он не видит разницы между большими и малыми буквами, т.о. будет воспринимать их как однк переменную.
Далее сумма площадей N колец, это нечто эдакое:
![+\pi (R_{N}^2-r_{N}^2)=\pi [(R_{1}^2-r_{1}^2)+(R_{2}^2-r_{2}^2)+..+(R_{N}^2-r_{N}^2)]](https://tex.z-dn.net/?f=%2B%5Cpi+%28R_%7BN%7D%5E2-r_%7BN%7D%5E2%29%3D%5Cpi+%5B%28R_%7B1%7D%5E2-r_%7B1%7D%5E2%29%2B%28R_%7B2%7D%5E2-r_%7B2%7D%5E2%29%2B..%2B%28R_%7BN%7D%5E2-r_%7BN%7D%5E2%29%5D "+\pi (R_{N}^2-r_{N}^2)=\pi [(R_{1}^2-r_{1}^2)+(R_{2}^2-r_{2}^2)+..+(R_{N}^2-r_{N}^2)]")
Чтобы устроить подобныйсчет в паскале придется организовать цикл.
Таким образом общий алгоритм программы проглядывает в таком порядке
1. Объявить все переменные (Данные) это само собой.
2. Присвоить переменным начальные значения (инициализировать) те, что есть по условию (или просто 0, чтоб потом легче отлаживать)
3.Запросить у пользователя недостающие данные, например N может запрашиваться у пользователя.
4. Организация цикла расчета
5. Вывод результатов.
Теперь разберемся с пунктом 4
Для организации цикла как мне представляется надо будет задействовать 2 такие переменные i, Ssum,Si, Rin, Rout,. Где
i - переменная-счетчик, что изменяется от 1 до N, для организации цикла. (Integer целая)
Ssum - переменная, в которой будет накапливаться суммарная площадь. (Не помню как паскаль поступает с вновь объявленными переменными, но в начале программы лучше присвоить ей нулевое значение, чтобы там не оказалось случайного мусора)
Si - переменная в которой хранится текущая вычисленная площадь.
Rin - текущий внутренний радиус.
Rout - текущий внешний радиус.
Переменные:Ssum,Si, Rin, Rout типа (Realвещественный )
Ну и считаем в следующем порядке
Перед началом цикла
Ssum:=0 (о чем уже говорилось)
далее цикл
FOR I:=1 to N
Вычислить текущие значения внешнего и внутреннего радиусов
(У нас внутренний радиус не меняется, но более общем случае тут мог, быть расчет)
Вычисляем площадь текущего (по счетчику) кольца:
Накапливаем в Ssum суммарную площадь
Далее цикл FOR выполняет такие действия:
увеличивает на 1 переменную счетчик I
I:=I+1
Сравнивает ее с N, если 
уходим на "следующий виток" цикла, в противном случае выходим из него.
Кстати так можно было организовать цикл типа (Repeat, Until) тогда приращение счетчика надо организовать самому. For делает это сам, если не ошибаюсь.