Готовое решение задачи Паскаль. Решения Pascal. Задачи паскаль. Задачи pascal

Условие Задачи: Решение ТУТ

Составить постановку, алгоритм и программу подсчитывающую сумму меньших чем предыдущие элементов массива S из 13 чисел. Значения элементов массива ввести с клавиатуры.
Блок схема

___________________________________________________________