"Scilab: Решение инженерных и математических задач", глава 9, 9.5, листинг 9.21:
допущены две ошибки:
0. Дана строка--> summa=summa-A(int(N/2)*2+1,int(N/2)*2+1);
    так, если N нечетно, мы вычтем элемент A(N,N), что ошибочно.
   должно быть--> summa=summa-A(int(N/2)+1,int(N/2)+1);
1. строка --> maximum=A(1,1); kolichestvo=1;
    в таком случае, если элемент A(1,1) будет максимальным,
    то этот элеменит посчитается два раза.
   должно быть--> maximum=A(1,1); kolichestvo=0;