Подозрительная ошибка

[gleensande]

Тут такое дело:
у меня в программе есть две переменные(t и sum) и одна константа (m). Но когда я их делю таким образом:

t:=sum/m;

То и Паскаль АБС и Турбо Паскаль выдает ошибку о том, что я неправильно преобразовываю типы.
А именно в АБС: Нельзя преобразовывать тип real к integer. В Турбо: type mismatch.
Благодарности моей не будет предела, если подскажете, в чем подвох.
Вот полный код программы:

program pr4_11;
const
  m=10;
  n=12;
var 
  a:array[1..n,1..m] of integer;
  i,j,k,sum,t,pay: integer;
begin
  for i:=1 to n do
    for j:=1 to m do
      a[i,j]:=7000-random(1000);
      
  for i:=1 to n do
  begin
    for j:=1 to n do
     write(a[i,j],' ');
    writeln;
  end;           
  
  sum:=0;
  
  for i:=1 to n do
    for j:=1 to m do
      sum:=sum+a[i,j];
      
  t:=sum/m;
 
  pay:=0;
  
  for j:=1 to m do
    begin
      for i:=1 to n do
        pay:=pay+a[i,j];
      if pay>t then
        inc(k);
    end;
  
   write('Таких людей ',k);
end.

[BDA]

Результат такого деления действительное число. Или используйте целочисленное деление div, или используйте функции округления.

[gleensande]

Премного благодарю!
Теперь программа работает некорректно, но хотя бы работает, с остальным разберусь

[BDA]

Пожалуйста. А насчет некорректности: при печати массива верхняя граница одного цикла неверно выбрана; pay обнулять нужно для каждого столбца, наверное, а не только в начале; k перед использованием неплохо бы обнулить.