Alg1- Caderno -8. Um sistema de equações lineares do tipo:

algoritmo "algoritmo que lê os coeficientes a,b,c,d,e e f e calcula e mostra os valores de x e y. "

// Função :
// Autor :
// Data : 27/08/2010
// Seção de Declarações
var
     a,b,c,d,g,f,x,y: real
inicio
// Seção de Comandos
   escreval("Entre com 6 números apertando enter ao digitar cada um: ")
   leia(a,b,c,d,g,f)
   x<-((c*g)-(b*f))/((a*g)-(b*d))
   y<-((a*f)-(c*d))/(a*g)-(b*d))
   escreva("X = ",x, " Y = ",y)
fimalgoritmo