Como não houve uma pré definição de uma linguagem específica utilizarei pseudocódigo:
algoritmo "Equação Biquadrada"
var
a, b, c: inteiro
delta, y1, y2 , x1, x2: real
inicio
escreva("Insira o valor de A: ")
leia(a)
escreva("Insira o Valor de B: ")
leia(b)
escreva("Insira o valor de C: ")
leia(c)
//Dada a fórmula ay^2 + by + c = 0 | onde y = x^2
delta <- b^2 - 4*a*c
escreval("Delta:", delta)
se (delta > 0) entao
y1 <- (b*(-1) + delta^0.5)/2
y2 <- (b*(-1) - delta^0.5)/2
// y = x^2
se(y1 > 0) entao
x1 <- y1^0.5
escreval("X1:",x1)
senao
escreval("X1 é raiz quadrada de ",y1)
fimse
se(y2 > 0) entao
x2 <- y2^0.5
escreval("X2:",x2)
senao
escreval("X2 é raiz quadrada de ",y2)
fimse
escreval("Y1:",y1)
escreval("Y2:",y2)
senao
escreva("Não foi possível encontrar a raiz quadrada de",delta)
fimse
fimalgoritmo
Para escrever sua resposta aqui, entre ou crie uma conta
Ciência da Computação
•UNESP
Compartilhar