Задача на нахождение суммы элементов заданного интервала с шагом 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.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.923 из 5
Похожие ответы