Найти суммарную площадь n колец, внутренние радиусы которых одинаковы, а значение внешних радиусов образуют последовательность: 5, 10, ). нужно написать решение в турбо паскале, кому не сложно

Площадь кольца вычисляется по формуле : тут r - внешний радиус кольца r - внутренний радиус кстати в самом турбо паскале обзначения r и r не прокатят, он не видит разницы между большими и малыми буквами, т.о. будет воспринимать их как однк переменную. далее сумма площадей n колец, это нечто эдакое: чтобы устроить подобный счет в паскале придется организовать цикл.таким образом общий алгоритм программы проглядывает в таком порядке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 делает это сам, если не ошибаюсь.

программа на языке pascal, успехов в учебе.

program pr;

var n,m,z,k,i,vm: integer;

begin

readln (n,m,z);

vm: =n*60+m;

i: =1;

while i< =vm do

begin

k: =k+1;

i: =i+z;

end;

writeln (k);

readln;

end.

Закончились лекции, и студенты пошли домой (конъюнкция). в природе бывает, что солнце при дожде светит или прячется в тучах (дизъюнкция). в этом году летом мы либо поедем к морю, либо будем жить на даче (строгая дизъюнкция). если будет хорошая погода, то мы пойдем гулять (импликация). неверно, что 2 * 2 = 5 (инверсия). завтра мы не пойдем гулять (инверсия). я куплю ноутбук тогда и только тогда, когда получу премию (эквиваленция).