на PascalABC.NET:
var
a: array [1..5] of integer;
S: integer;
begin
writeln('Введите элементы массива (5) :');
for var i := 1 to 5 do
read(a[i]);
S := 0;
S := S + a[i];
end;
writeln('Сумма всех элементов массива: ', S);
end.
x = []
for i in range(5):
x.append(int(input()))
print(x)
s = 0
s += x[i]
print(s)
на PascalABC.NET:
var
a: array [1..5] of integer;
S: integer;
begin
writeln('Введите элементы массива (5) :');
for var i := 1 to 5 do
read(a[i]);
S := 0;
for var i := 1 to 5 do
begin
S := S + a[i];
end;
writeln('Сумма всех элементов массива: ', S);
end.
x = []
for i in range(5):
x.append(int(input()))
print(x)
s = 0
for i in range(5):
s += x[i]
print(s)