Massiv = [1, 2, 3, 4, 5]
Summa = 0
for i in Massiv:
summa += i:
print(summa)
Объяснение: Там тип данных обозначит надо можно ещё с
модуля регулярных выражений (arrey)
//Pascal ABC.NET 3.8.2
var
arr : array[1..10] of integer;
sum : integer;
begin
sum := 0;
write('Сгенерированный массив: ');
for var i := 1 to 10 do
arr[i] := random(10);
sum := sum +arr[i];
write(arr[i], ' ');
end;
writeln;
write('Сумма элементов массива:', sum);
end.
Massiv = [1, 2, 3, 4, 5]
Summa = 0
for i in Massiv:
summa += i:
print(summa)
Объяснение: Там тип данных обозначит надо можно ещё с
модуля регулярных выражений (arrey)
//Pascal ABC.NET 3.8.2
var
arr : array[1..10] of integer;
sum : integer;
begin
sum := 0;
write('Сгенерированный массив: ');
for var i := 1 to 10 do
begin
arr[i] := random(10);
sum := sum +arr[i];
write(arr[i], ' ');
end;
writeln;
write('Сумма элементов массива:', sum);
end.