Предмет: Информатика,
автор: An863
Программа вычисления суммы элементов в одномерном массиве
Ответы
Автор ответа:
2
const
n = 10;
var
x: array[1..n] of integer;
i, s: integer;
begin
Randomize;
Writeln('Элементы массива');
s := 0;
for i := 1 to n do
begin
x[i] := Random(50);
Write(x[i]:3);
s:=s+x[i]
end;
Writeln;
Writeln('Сумма элементов массива равна ',s)
end.
Тестовое решение:
Элементы массива
11 32 9 24 25 19 21 20 40 3
Сумма элементов массива равна 204
n = 10;
var
x: array[1..n] of integer;
i, s: integer;
begin
Randomize;
Writeln('Элементы массива');
s := 0;
for i := 1 to n do
begin
x[i] := Random(50);
Write(x[i]:3);
s:=s+x[i]
end;
Writeln;
Writeln('Сумма элементов массива равна ',s)
end.
Тестовое решение:
Элементы массива
11 32 9 24 25 19 21 20 40 3
Сумма элементов массива равна 204
Похожие вопросы
Предмет: Русский язык,
автор: pustovalova196
Предмет: Русский язык,
автор: Py4KaJKJLACC
Предмет: Русский язык,
автор: 2Арина11111111
Предмет: Қазақ тiлi,
автор: Znazym
Предмет: Геометрия,
автор: GraecfulLan