Question

Написать программу для вычисления суммы числел от A до B (где A<=B) Указание: переменная, которая будет накапливать сумму в начале должна быть равна нулю

Answer 1

1. Современное решение

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (a,b):=ReadInteger2('Введите через пробел a и b:');
  Writeln('S=',Range(a,b).Sum)
end.

Пример
Введите через пробел a и b: 5 18
S=161

2. К сожалению, все еще часто типичный для школы вариант

var
  a,b,i,s:integer;
 
begin
  Write('Введите через пробел a и b: ');
  Read(a,b);
  s:=0;
  for i:=a to b do
    s:=s+i;
  Writeln('S=',s)
end.

Answer 2

Программа для вычисления суммы чисел от A до B может быть написана на языке программирования, например, на Python. Вот пример такой программы:

A = int(input("Введите значение A: "))  # Ввод значения A с клавиатуры
B = int(input("Введите значение B: "))  # Ввод значения B с клавиатуры

summa = 0  # Переменная для накопления суммы, изначально равна нулю

# Цикл для вычисления суммы чисел от A до B
for i in range(A, B+1):
    summa += i

print("Сумма чисел от", A, "до", B, "равна", summa)

В этой программе мы сначала запрашиваем у пользователя значения A и B. Затем создаем переменную `summa` и устанавливаем ее значение равным нулю. После этого мы используем цикл `for` для прохода по всем числам от A до B (включительно) и прибавляем каждое число к переменной `summa`. Наконец, выводим результат вычисления на экран.

Например, если пользователь введет A = 1 и B = 5, программа выведет: "Сумма чисел от 1 до 5 равна 15".