Язык не написан, значит могу написать на любом? Вот тебе JavaScript ;D
var arr = [], N, K, L, sum = 0; // (1 <= K <= L <= N)
N = Number(prompt('Введите размер массива (N)')); K = Number(prompt('Введите K')); L = Number(prompt('Введите L'));
for (let i = 0; i < N; i++) { arr[i] = Math.round(Math.random()*10); if (K <= i && L >= i) sum += arr[i]; }
console.log(`В массиве, размерностью ${N}, состоящем из чисел [${arr}], сумма элементов с позиции ${K} до ${L} (включительно), равна ${sum}`); // Или alert(text);
Const nn=100; var a:array[1..nn] of integer; i,n,k,l,s:integer; begin Randomize; Write('Количество элементов в массиве: '); Read(n); Write('Границы для суммирования: '); Read(k,l); { Считаем,что все введено корректно без проверки } Writeln('Элементы массива'); s:=0; for i:=1 to n do begin a[i]:=Random(100); Write(a[i],' '); if i in [k..l] then s:=s+a[i] end; Writeln(#13#10,'Найденная сумма: ',s) end.
Пример Количество элементов в массиве: 13 Границы для суммирования: 3 9 Элементы массива 30 82 9 6 20 99 58 61 18 61 73 51 28 Найденная сумма: 271
var arr = [], N, K, L, sum = 0; // (1 <= K <= L <= N)
N = Number(prompt('Введите размер массива (N)'));
K = Number(prompt('Введите K'));
L = Number(prompt('Введите L'));
for (let i = 0; i < N; i++) {
arr[i] = Math.round(Math.random()*10);
if (K <= i && L >= i) sum += arr[i];
}
console.log(`В массиве, размерностью ${N}, состоящем из чисел [${arr}], сумма элементов с позиции ${K} до ${L} (включительно), равна ${sum}`);
// Или alert(text);
Лог программы:
Введите размер массива (N): 15
Введите K: 3
Введите L: 12
В массиве, размерностью 15, состоящем из чисел [2,3,8,5,6,9,7,8,8,5,4,10,7,6,5], сумма элементов с позиции 3 до 12 (включительно), равна 69
nn=100;
var
a:array[1..nn] of integer;
i,n,k,l,s:integer;
begin
Randomize;
Write('Количество элементов в массиве: '); Read(n);
Write('Границы для суммирования: '); Read(k,l);
{ Считаем,что все введено корректно без проверки }
Writeln('Элементы массива');
s:=0;
for i:=1 to n do begin
a[i]:=Random(100);
Write(a[i],' ');
if i in [k..l] then s:=s+a[i]
end;
Writeln(#13#10,'Найденная сумма: ',s)
end.
Пример
Количество элементов в массиве: 13
Границы для суммирования: 3 9
Элементы массива
30 82 9 6 20 99 58 61 18 61 73 51 28
Найденная сумма: 271