Proc21. Описать функцию SumRange($A$, $B$) целого типа, находящую сумму всех целых чисел от $A$ до $B$ включительно ($A$ и $B$ — целые). Если $A > B$, то функция возвращает 0. С помощью этой функции найти суммы чисел от $A$ до $B$ и от $B$ до $C$, если даны числа $A, B, C$.

Решение Дмитрий:

Другие задачи из раздела Proc можно посмотреть здесь.