Задачки на двумерный символьный массив в Delphi

[Ann_Sh]

Вот такие вот две задачки, сижу уже 3 дня и никак не соображу до конца!!!
В символьном массиве, содержащем М строк и N столбцов определить:
1. сколько раз встречается символ звездочка на главной диагонали;
2. в какой строке содержится наибольшее число букв
3. в каком столбце максимальное число повторения символа

[Mad_Cat]

Если массив M на N и m<>n то у него нет главной диагонали!

[Ann_Sh]

Спасибо, я знаю, что матрица квадратная))

[Mad_Cat]

1)

count:=0;
for i:=1 to n do
if mas[i,i]='*' then inc(count);

2)

c:=0;z:=1;
for i:=1 to n do begin
m:=0;
for j:=1 to m do
if mas[i,j] in ['A'..'Z','a'..'z'] then inc(m);
if m>=с then begin z:=i; c:=m;end;
end;

3)

{что то типа этого}
c:=0;z:=1;
for j:=1 to m do
for i:=1 to n-1 do begin 
m:=0;
 for k:=i+1 to n do
 if a[i,j]=a[i,k] then inc(m);
if m>=c then begin z:=i; c:=m;end;
end;

[Ann_Sh]

Спасибо за помощь)
Сразу же попробую сделать...

[Ann_Sh]

А можно полный листинг программы? Я только начала изучать Delphi и просто не знаю, куда и как эти коды писать...