Составить алгоритм и программу для вычисления суммы чисел: 3,7,11,15 ...,87.

program zz1;

var i, s:integer; / / задаем переменные целого типа

begin

i:=3; / / задаем начальное значение числа ряда

while i < = 87 do / / организуем цикл, в котором переберем все числа заданного ряда от трех до восьмидесяти семи

begin

s:=s + i; / / число ряда прибавляем к сумме

i:=i + 4; / / из условия задачи стало понятно, что каждое следующее число отличается от предыдущего на четыре, исходя из этого получаем следующее число из ряда

end;

write (' полученная сумма чисел ряда = ', s); / / выводим ответ

end.