Question

Найти сумму элементов первой строки массива 7х7 созданного при помощи генератора случайных чисел, паскаль.

Answer 1

Program n1;
const n=7;
var a: array[1..n,1..n] of integer;
i,j,sum: integer;
begin
randomize;
writeln('исходный массив:');
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(9)+1;
write(a[i,j],' ');
end;
writeln;
end;
for i:=1 to n do sum:=sum+a[1,i];
write('сумма элементов 1 строки: ',sum);
end.

Answer 2

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=MatrRandom(7,7,-50,50);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Сумма по первой строке: ',a.Row(0).Sum)
end.