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

program zz1;
var i, s:integer; // задаем переменные целого типа
begin
i:=3; // задаем изначальное значение числа ряда 
while i lt;= 87 do // организуем цикл, в котором переберем все числа данного ряда от 3-х до восьмидесяти 7
begin
s:=s + i; // число ряда добавляем к сумме
i:=i + 4; // из условия задачки стало понятно, что каждое последующее число отличается от предшествующего на четыре, исходя из этого получаем последующее число из ряда
end;
write( приобретенная сумма чисел ряда = , s); // выводим ответ
end.