Задача на нахождение суммы элементов заданного интервала с шагом 1 - PascalABC.NET
Формулировка задачи:
Помогите пожалуйста .
Программа запрашивает у пользователя два целых числа, затем вычисляет сумму чисел внутри этого интервала с шагом в единицу.
Спасибо
Решение задачи: «Задача на нахождение суммы элементов заданного интервала с шагом 1»
textual
Листинг программы
var a,b,i,s:integer; begin writeln('Введите 2 целых числа'); readln(a,b); if a>b then begin s:=a; a:=b; b:=s; end; s:=0; for i:=a+1 to b-1 do s:=s+i; write('S=',s) end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д