Составить программу.Через двумерный массив.
Дана матрица А.Сформировать вектор В,каждый элемент которого равен длине соответствующей строке матрицы А.
Длина строки считается по b1=√a11²+a12²+a13²+..
b2=√a21²+a22²+a23²+..
Матрица вводится с клавиатуры.(pascal)

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Количество строк в матрице:');  var m:=ReadInteger('Количество столбцов в матрице:');  Writeln('Вводите элементы матрицы построчно');  var a:=new real[n,m];  var b:=new real[n];  for var i:=0 to n-1 do begin    b[i]:=0;    for var j:=0 to m-1 do begin      Read(a[i,j]);      b[i]+=Sqr(a[i,j])      end;    b[i]:=Sqrt(b[i])    end;  Writeln('Сформированный вектор');  b.Println;end.ПримерКоличество строк в матрице: 4Количество столбцов в матрице: 3Вводите элементы матрицы построчно3.4 5.1 8-1 0 1-5.34 1.777 53 4 5Сформированный вектор10.0781942827076 1.4142135623731 7.52816903370268 7.07106781186548