Вычисление суммы чисел от 15 до 195 - Turbo Pascal
Формулировка задачи:
составить программу вычисления суммы чисел от 15 до 195
Решение задачи: «Вычисление суммы чисел от 15 до 195»
textual
Листинг программы
const a=15; b=195; begin WriteLn((a+b)*(b-a+1) div 2); end.
Объяснение кода листинга программы
- const a=15; b=195; — объявляются две константы, которые представляют собой границы диапазона чисел для вычисления суммы.
- begin — начинается выполнение программы.
- WriteLn((a+b)(b-a+1) div 2); — выполняется вычисление суммы чисел от 15 до 195 с помощью формулы суммы арифметической прогрессии (a+b)(b-a+1)/2. Функция WriteLn используется для вывода результата на экран.
- end. — заканчивается выполнение программы.