Кто подскажет как сложить две циклические суммы, что не так у меня при их сложении?
Блоки расставьте нормально и всё увидите сами.
А почему sum это процедура, а не функция. Она же считает 1 значение. И тогда можно так
Sum(n1,m1,f1) + Sum(n2,m2,f2)
Также не понятно зачем Sum1. И что там происходит... S3 она не выводит. Да и для сложения двух результатов вряд-ли нужна отдельная процедура.