![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
матрица [D5, D6, Win95/98, WinXP]
Makc © (2004-11-20 12:55:00)Я имею матрицу комплексных чисел.Как найти матрицу меньшего порядка,если...
Fenik (2004-11-21 11:48:00) [1]Ну вот, пришел телепат, а толку мало. Код давай! :))
SergP (2004-11-20 21:44:00) [2]Как я понял нужно вырезать из исходного массива заданную строку и заданный столбец... Неужели это может вызвать затруднения?
Fenik (2004-11-20 19:19:00) [3]> Makc (20.11.04 14:34) [7]
> Fenik в чём конкретно?
В задаче, которую ты решаешь: "Я имею матрицу комплексных чисел.Как найти матрицу меньшего порядка,если для определения определителя этой матрицы я опять вызываю эту функцию."
Ильичев С.А. (2004-11-20 18:11:00) [4]Ну тогда и я не понял тебя, Макс.
Но если ты сам себя понимаешь, то скорее всего найдешь ответ на сайте:
http://algolist.manual.ru/
Palladin (2004-11-20 14:50:00) [5]:)
Makc, я тоже тебя не понял
Makc (2004-11-20 14:34:00) [6]Fenik в чём конкретно?
Fenik (2004-11-20 14:28:00) [7]Я тебя не понял Makc
Makc (2004-11-20 14:12:00) [8]Я тебя не понял MBo
Makc (2004-11-20 14:09:00) [9]
function Det(M:array of array of real;n,m:word):real;
var
//об'явление переменных;
begin
s:=0;
for i:=1 to m do
for j:=1 to n do
begin
//образование под матрицы M матрицы N;
if (m>1)and (m>1) then s:=s+M[i,j]*power(-1,i+j)*det(n-i,j-i)
else s:=s+m[i,j]*power(-1,i+j)*N(1,1);
end;
end.
MBo (2004-11-20 14:07:00) [10]http://www.delphimaster.ru/cgi-bin/forum.pl?id=1100324580&n=0
Непонятно, что именно непонятно ;)
Makc (2004-11-20 13:58:00) [11]Я имею матрицу комплексных чисел.Как найти матрицу меньшего порядка,если для определения определителя этой матрицы я опять вызываю эту функцию.
MBo (2004-11-20 13:09:00) [12]если, то...