Exponenta.ru

Да, действительно была проблема с выводом ответа. Спасибо большое, теперь все получается.

Irmantas писал(а): Добавил evalf в матрицу b и LinearSolve(TT, FF) работает до n=m=25 .
b:=matrix(m,n,(j,k)->evalf(sum(a[t,j]*a[t,k],t=1..m-1)*h[x]*h[s])):

Сделав тоже самое, все равно не выдает ответ(((

вот этот алгоритм. значения n,m меняются. вот больше 10 не считает

Этот пакет подключен для решения, но уже для системы из 11 уравнений выдает такой ответ: U := Vector(4, {(1) = ` 1 .. 11 `*Vector[column], (2) = `Data Type: `*anything, (3) = `Storage: `*rectangular, (4) = `Order: `*Fortran_order})

Есть ли какие-нибудь встроенные функции в MAPLE, позволяющие решить систему уравнений, если матрица порядка 100х100???
Функция linearsolve берет только матрицы, размером 10х10((

Ой, точно. Забыла одно условие прописать
Спасибо Вам большое, Вы очень сильно мне помогли. Безумно Вам благодарна

все равно ругается на решение((

Irmantas писал(а):Неизвестный вид матриц FF, TT
Пришлите мапле файл.

версия MAPLE 11

:oops: Подскажите, пожалуйста, как вывести решение систем уравнений, записанных в матричной форме. Ввожу так , но решение не выдает((( > Y := array(sparse, 1 .. n); for i to m do Y[i] := y[i] end do; evalm(`&*`(TT, Y) = FF); > U := array(sparse, 1 .. n); for i to ...

У меня опять проблемка((( :oops: :oops: Не получается с условиями матрицу записать, хотя по книжке все( T := array(1 .. m, 1 .. n); for i to m do for j to n do T[i, j] := 0 end do end do; if i > j then T[i, j] := 0 end if; if 1 < i and i <= n then T[i, i] := sqrt(b[i, i]^alpha-(sum&#...

спасибо большое. Вы меня спасаете просто. Очень благодарна

Извиняюсь, наверно за простой вопрос. но как таким же способом задать вектор,что-то не получается((

какое уравнение-то? напиши чтоли его

В чем ошибка была теперь понятно, алгоритм исправлен. Все работает как надо теперь =) Очень благодарна за помощь

с матрицей А получилось. она автоматически записывается, а вот с В выдает ошибку a:=matrix(n,m,(i,j)->K(x[i],xi[j])); b:=matrix(n,m,(j,k)->sum(a[i,j]*a[i,k],i=1..m-1)*h[x]*h[xi]); Error, (in unknown) 1st index, 6, larger than upper array bound 5