Вычислить сумму всех элементов массива. x i = x 1 ...... x 10 Помогите :)
Ответы на вопрос
Ответил BobbyFresnel
0
// PascalABC.NET
begin
var x := ReadArrInteger(10);
x.Sum.Print
end.
Ответил LRSM
0
Ответ:
Или если вдруг предыдущий ответ чем-то не угодил:
- var
- x: array[1..10] of integer;
- sum: integer;
- begin
- for var i := 1 to 10 do read(x[i]);
- for var i := 1 to 10 do sum := sum + x[i];
- write(sum);
- end.
Пример работы:
Приложения:
Новые вопросы