Составьте программу поиска чаще всего встречающегося элемента массива С(М,М).

//PascalABC.NET 3.1 сборка 1200begin  var n := ReadInteger('n=');  var a := MatrixRandom(n, n, 0, 10);  println(a);    var d := new System.Collections.Generic.Dictionary<integer, integer>();   for var i := a.GetLowerBound(0) to a.GetUpperBound(0) do    for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do     begin      if d.ContainsKey(a[i, j]) then        d[a[i, j]] += 1      else        d.Add(a[i, j], 1);    end;      var p := d.OrderByDescending(x -> x.Value).First();  println('Чаще всего встречается ' + p.Key + ', ' + p.Value + ' раз');end.