Написать метод, который принимает строку и выводит три буквы, которые встречается в строке чаще всего. (Пробел это не буква) пайтон

Const x0=0; xn=6; h=0.2;
var x,y:real; i,n:integer;
begin
n:=round((xn-x0)/h)+1;
x:=x0-h;
for i:=1 to n do
 begin
 x:=x+h;
 y:=cos(x/3+0.3);
 writeln(x:4:1,y:8:3);
 end;
end.

Результат:
 0.0   0.955
 0.2   0.934
 0.4   0.908
 0.6   0.878
 0.8   0.844
 1.0   0.806
 1.2   0.765
 1.4   0.720
 1.6   0.672
 1.8   0.622
 2.0   0.568
 2.2   0.512
 2.4   0.454
 2.6   0.393
 2.8   0.331
 3.0   0.267
 3.2   0.203
 3.4   0.137
 3.6   0.071
 3.8   0.004
 4.0  -0.062
 4.2  -0.129
 4.4  -0.195
 4.6  -0.260
 4.8  -0.323
 5.0  -0.386
 5.2  -0.446
 5.4  -0.505
 5.6  -0.561
 5.8  -0.615
 6.0  -0.666

// PascalABC.NET 3.2, сборка 1362 от 14.12.2016
// Внимание! В других версиях языка работа не гарантируется!

begin
  var m:=ReadInteger('Количество строк в массиве:');
  var n:=ReadInteger('Количество столбцов в массиве:');
  Writeln('*** Исходный массив A[',m,',',n,'] ***');
  var a:=MatrRandom(m,n,-50,50);
  a.Println(4);
  Writeln(4*a.ColCount*'-');
  var k:=a.Rows.Select(x->x.Aggregate(0,(x,y)->x+y)).ToArray.IndexMax;
  for var j:=0 to (n-1) div 2 do Swap(a[k,j],a[k,n-1-j]);
  a.Println(4)
end.

Пример
Количество строк в массиве: 4
Количество столбцов в массиве: 5
*** Исходный массив A[4,5] ***
  29  36 -50  -4 -32
  -1 -10  -7 -47 -50
 -16   4  48 -41 -43
   8  46  45  14 -44

  29  36 -50  -4 -32
  -1 -10  -7 -47 -50
 -16   4  48 -41 -43
 -44  14  45  46   8