===== PascalABC.NET =====

begin

 var (m, n) := ReadInteger2('Число строк и столбцов:');

 var a := MatrRandom(m, n, 10, 99);

 a.Println(3);

 var k := a.ElementsByRow.Distinct.Count;

 Println('Количество различных элементов:', k)

end.