Versão do Scilab: 5.5.2 Observação: Só calcula equação linear e quadrática; clear clc //Eliminação Gaussiana //Variavel matriz é a matriz incompleta //Variavel matrizResposta é a matriz que contem as respostas dos sistemas lineares function matrizCoeficientes= eliminacaoGauss(matriz, matrizResposta) matrizCompleta=[matriz matrizResposta]; n=size(matriz,1); disp("Resolução do Sistema") disp("Matriz Ampliada = ") disp(matrizCompleta) for j=1:(n-1) for i=(j+1):n mij=matrizCompleta(i,j)/matrizCompleta(j,j) matrizCompleta(i,:)=matrizCompleta(i,:)-mij*matrizCompleta(j,:) end end disp("Matriz Escalonada") disp(matrizCompleta) //Fazer Retrosubstituição matrizCoeficientes(n)=matr...
Comentários
Postar um comentário
Obrigado pelo contato, retornarei o mais breve possível!