Матрицу размером 5 х 10 заполните случайными двоичными цифрами (0 и

Var
nbsp;nbsp;x: Array[1..5,1..10] of Integer;
nbsp;nbsp;i,j,max,t,st: Integer;
BEGIN
Writeln(Матрица:);
For i:=1 to 5 do
begin
nbsp;nbsp;For j:=1 to 10 do
nbsp;nbsp;begin
nbsp;nbsp;nbsp;nbsp;x[i,j]:=Random(2);
nbsp;nbsp;nbsp;nbsp;If x[i,j]=0 Then Inc(t);
nbsp;nbsp;nbsp;nbsp;Write(x[i,j]:2);
nbsp;nbsp;end;
nbsp;nbsp;If tgt;max Then
nbsp;nbsp;begin
nbsp;nbsp;nbsp;nbsp;max:=t;
nbsp;nbsp;nbsp;nbsp;st:=i;
nbsp;nbsp;end;
nbsp;nbsp;t:=0;
nbsp;nbsp;Writeln
end;
Writeln(Строчка с наиб. кол-вом нулей: ,st);
END.