Помогите с блок-схемой алгоритма приведения матрицы к верхне треугольной и нижне треугольной...И решения системы уравнений.
Приведение к верхнетреугольной есть в http://forum.pascal.net.ru/index.php?s=&showtopic=2694&view=findpost&p=23475
а поконкретнее
Какая именно конкретность нужна?
Сделать copy-paste того куска кода из FAQ?
Ссылку поточнее, я тупо не вижу где :-)
Тьфу ты
Вообще не на тот форум отвечал.
Верхнедиагональная матрица - просто нули под главной диагональю.
Нижнедиагональная над
Точнее ссылку дать нельзя - она и так указывает на нужный пост... Внизу этого поста см. "Вычисление детерминанта (определителя) матрицы приведением к диагональному виду." - там сначала матрица приводится к диагональному виду (что тебе и надо), и только потом считается ее определитель.
А, всё-таки не перепутал форумы
Или перепутал
Там про определитель спрашивали
А попал как удачно ссылкой
Как вывообще по такой жаре думать можете?
Я запускал ту программу... Не понимаю где в коде место преобразования матрицы :-)
Оззя, про кондиционеры не слышал никогда?
greteon, показывай данные, которые вводил в программу...
Ну короче я сидиотничал, работает всё правильно :-) Хорошая программа :-) Не понимаю где в коде место преобразования матрицы :-)
for i:=1 to pred(n) do begin
if abs(a[i,i])<epsilon then begin
det:=0.0; exit
end;
for j:=succ(i) to n do begin
d:=a[j,i]/a[i,i];
for k:=i to n do
a[j,k]:=a[j,k]-d*a[i,k];
end;
end;
"pred(n)" ... "succ(i)" что это?-)))
pred - предыдущий
succ - последующий
т.е. можно заменить на n-1 и i+1