Паскаль

От студента
Необходимо составить одну программу в Паскале по блок-схеме, 3 лабораторная работа. Еще по одной программе у меня выдает концентрации и давление, равные нулю, нужно найти ошибку, либо заново составить программу (Лабораторная работа №1). Саму программу не я составляла.
Везде вариант 15.
Программа по 1 лаб работе
Я не совсем разбираюсь в данной программе, поэтому не могли бы вы прислать ещё пояснения к составленной программе, как что рассчитывается, что откуда берётся, в общем, объяснить суть программы?
т.е цену формируй, не только тупо код написать , а еще обьяснить суть проги , и строчки обьяснить , что бы она смогла обьяснить , и та прога которая у нее не работает , если там дохера ошибок , что заново перепеисывать , то тоже цену соответственно, только напиши отдельно цену , за т которую с нуля и ту которую ошибки найти
СРОК КРАЙНИЙ