Здравствуйте, romaf91, Вы писали:

R>double Ht[n][N]; — вот здесь ошибка в самом начале, неверный размер массива, исправил , вроде работает. можете проверить ?

Ссылку на codepad или ideone можно?