Программа вычисления суммы элементов в одномерном массиве
Программа вычисления суммы элементов в одномерном массиве
Гость
Ответ(ы) на вопрос:
Гость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
Не нашли ответ?
Похожие вопросы