Чтобы найти сумму чисел от 1 до 25 в языке программирования Pascal, можно воспользоваться циклом для последовательного сложения чисел. Вот пример программы, которая выполняет эту задачу:
program SumNumbers;
var
i, sum: integer;
begin
sum := 0; { Инициализируем переменную для хранения суммы }
for i := 1 to 25 do { Цикл от 1 до 25 }
sum := sum + i; { Добавляем текущее значение i к сумме }
writeln('Сумма чисел от 1 до 25: ', sum); { Выводим результат }
end.
Пояснение:
Объявление переменных:
i
: используется как счетчик в цикле.
sum
: используется для хранения суммы чисел. Изначально инициализируется значением 0.
Цикл for
:
- Проходит по всем числам от 1 до 25.
- На каждой итерации текущее значение
i
добавляется к переменной sum
.
Вывод результата:
- После завершения цикла программа выводит итоговую сумму.
Математическое обоснование:
Сумму чисел от 1 до N можно также вычислить по формуле арифметической прогрессии:
[ \text{Сумма} = \frac{N \times (N + 1)}{2} ]
Для N = 25, это будет:
[ \text{Сумма} = \frac{25 \times 26}{2} = 325 ]
Таким образом, программа и математическая формула дают одинаковый результат.