В среде программирования FreePascal составить программу для нахождения суммы последовательности чисел произвольного диапазона. Проверить работупрограммы для чисел от 5 до 12
var i,d,a,b: integer; begin cls; writeln('введите кол-во чисел'); readln(a,b); d:=1; for i:=a to b do d:=d+1; writeln('cумма=',d); end. забивай числа 5 и 12 их сумма будет равняться 9 Ставь лучшее решение мне их 2 осталось
