Предмет: Информатика,
автор: 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
Интересные вопросы
Предмет: Английский язык,
автор: славкабулавка
Предмет: Английский язык,
автор: Natka288
Предмет: Другие предметы,
автор: Shizuka494
Предмет: Русский язык,
автор: anchoys2111
Предмет: Русский язык,
автор: remixzx60mailru