VB - Resolução de Sistema Lineares pelo método de eliminação de Gauss


Este é mais um programa para resolver sistemas lineares feito na linguagem Visual Basic, versão 6, que resolve um sistema lineares de 3 equações usando o método de eliminação de Gauss também conhecido como método do escalonamento.

Basta informar os valores para a forma matricial e clicar em cada um dos botões para obter o resultado:

Em álgebra linear, a eliminação de Gauss é um algoritmo que visa transformar uma matriz arbitrária numa matriz em escada de linhas, através de operações elementares, nomeadamente trocas de linhas e adições de múltiplos de certas linhas a outras linhas.

O Algorítmo:

Começando com zero pivôs executam-se as seguintes operações:

1- Considera-se a sub matriz da matriz inicial composta pelas linhas que ainda não têm pivô;
2- Nesta sub matriz, considera-se a primeira coluna com elementos não nulos, e chama-se ao primeiro destes um pivô;
3- Se a linha do novo pivô não for a primeira linha desta sub matriz, trocam-se estas duas linhas;
4- Para cada elemento não nulo abaixo do novo pivô, retira-se o múltiplo adequado da primeira linha da sub matriz de forma a anular esse elemento;
5- Se ainda restarem linhas não nulas sem pivô, volta-se ao passo 1!

A característica da matriz é o número de pivôs que apareceram no processo.

Pegue o projeto completo aqui: MetodoEliminacaoGauss.zip

Eu sei é apenas VB, mas eu gosto...

"Tornou pois Jesus a dizer-lhes: Em verdade vos digo que eu sou a porta das ovelhas. Todos quantos vieram antes de mim são ladrões e salteadores; mas as ovelhas não os ouviram. Eu sou a porta; se alguém entrar por mim. salvar-se-á, e entrará, e sairá, e achará pastagens." (João 10:7-9)

Referências


José Carlos Macoratti