проверить решение

Даны вещественные массивы A[14] S[14].Для каждого массива определить количество элементов предшествующих первому отрицательному элементу массива.

#include <iostream.h>
#include <iomanip.h>
// прототипы функций
void inputmas (int [14][14],char);
int schet (int[14][14]);
void outrez (int [14][14],char ,int);
void main()
{
//объявление массивов и переменных
int a[14],s[14],kola,kold;
inputmas(a,'a');// в функцию в качестве аргументов передается
inputmas(s,'s');// массив и его имя (символ в апострофах)

kola=schet(a);// вызов функции
kold=schet(s);
outrez (a,'a',kola);
outrez (s,'s',kold);
}
// определение функции ввода массива input()
void inputmas ( int x[14][14],char name)
{
int i,j;
cout <<"Вводим массив" << name << endl;
for (i=0;i<14;i++)
for (j=0;j<14;j++)
{
cout << "Введите элемент массива " << name << "[" << i << "] << "[ << j << "]=";
cin >> x[i][j];
}
}
//определение расчётной функции schet()
int schet (int m[14][14])
{
int i,kol,min;
min=m[0];// первоначально за min примем 1-й элемент
kol=0; // количество элементов,предшествующих минимальному
for(i=1;i<14;i++)
for(j=1;j<14;j++)
// нашли в массиве элемент, значение которого меньше значения принятого за минимум
{
min =m[i][j]; // заменили значение минимума
kol=i; // количество элементов, предшествующих минимальному
}
return(kol); // передача значения в точку вызова данной функции
}
// определение функции вывода массива outrez()
void outrez (int x[14][14],char name, int kol)
{
int i,j;
cout << "Исходный массив " << name << ":" << endl;
for (i=0;i<14;i++)
for (j=0;j<14;j++)
cout << setw (5) << x [i][j];
cout << " Наименьшему элементу в массиве" << name << "предшествует" << kol << элементов \n";
}


проверьте пожалуйста текст программы на ошибки, если таковые имеются напишите.