Ответы
Ответ дал:
0
// PascalABC.NET
begin
var x := ReadArrInteger(10);
x.Sum.Print
end.
Ответ дал:
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.
Пример работы:
Приложения:
Вас заинтересует
11 месяцев назад
11 месяцев назад
6 лет назад
6 лет назад