Дано значение А [-150;150] и В[-150;150]. Вывести все значения от А до В и их сумму.

Question

Дано значение А [-150;150] и В[-150;150]. Вывести все значения от А до В и их сумму.

Answer 1

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

begin
  var (a,b):=ReadInteger2('Введите через пробел значения A и B:');
  Writeln('Сумма чисел в указанном интервале равна ',A.To(B).Sum)
end.

Пример
Введите через пробел значения A и B: 0 150
Сумма чисел в указанном интервале равна 11325