Массивы в турбо паскале

мне нужно проверить на совместимость матрицу 5 на 5!!!
Нужно что-бы ранг основной матрицы был равен рангу розширеной матрицы!!!
тоесть определители имеют одинакувую размерность