5. Двумерные массивы. Описать массив для представления таблицы из 3-х строк и 4-х столбцов. Заполнить массив случайными числами. Определить номер строки, в которой сумма чисел максимальна. Паскаль АВС

//С Вами были Глеб(Gleb1Kosyrev) и Юлия(Nobunaga) Косыревы var ma:array[1..3,1..4] of integer; max,i,j,k,maxi:integer; begin; max:=0; randomize; writeln('Matrix:'); for i:=1 to 3 do  begin;   writeln;    for j:=1 to 4 do     begin;      ma[i,j]:=random(10);      write(ma[i,j]:4);      k:=k+ma[i,j];     end;    if k>max then    begin;     max:=k;     maxi:=i;    end;    k:=0;   end; writeln; writeln('Result:',maxi); end.