===== PascalABC.NET =====
begin
var a := ArrRandom(10, -99, 99);
a.Println;
var (x, y) := ReadInteger2('С какого по какой элементы суммировать?');
a?[x - 1:y].Sum.Println
end.
===== PascalABC.NET =====
begin
var a := ArrRandom(10, -99, 99);
a.Println;
var (x, y) := ReadInteger2('С какого по какой элементы суммировать?');
a?[x - 1:y].Sum.Println
end.