¿Cómo hago para convertir esta código PHP a Pseint?

Tengo este código en PHP y quisiera convertirla en Pseint.

function resecu()
{
var a = document.formular.a.value;
var b = document.formular.b.value;
var c = document.formular.c.value;
var d = document.formular.d.value;

if (a == 0){
alert("El coeficiente principal debe ser distinto de cero.");
return;
} //end if

if (d == 0){
alert("Una raíz es 0. Dividiendo entre x queda una ecuación de 2º grado.");
return;
} //end if

b = b/a;
c = c/a;
d = d/a;

var discrim, q, r, aux, s, t, term1, r13;

q = (3.0*c - (b*b))/9.0;
r = -(27.0*d) + b*(9.0*c - 2.0*(b*b));
r = r/54.0;

discrim = q*q*q + r*r;
term1 = (b/3.0);

if (discrim > 0) { // una raíz real y dos complejas
s = r + Math.sqrt(discrim);
s = ((s < 0) ? -Math.pow(-s, (1.0/3.0)) : Math.pow(s, (1.0/3.0)));
t = r - Math.sqrt(discrim);
t = ((t < 0) ? -Math.pow(-t, (1.0/3.0)) : Math.pow(t, (1.0/3.0)));
formular.sol1r.value = Math.round(10000000*(-term1 + s + t))/10000000;
term1 = term1+(s + t)/2.0;
formular.sol3r.value = formular.sol2r.value = Math.round(10000000*(-term1))/10000000;
term1 = Math.sqrt(3.0)*(-t + s)/2;
formular.sol2i.value = Math.round(10000000*term1)/10000000;
formular.sol3i.value = Math.round(10000000*(-term1))/10000000;
return;
} // end if

// formular.sol3i.value = formular.sol2i.value = 0;

if (discrim == 0){ // Todas las raíces reales, dos de ellas iguales.
r13 = ((r < 0) ? -Math.pow(-r,(1.0/3.0)) : Math.pow(r,(1.0/3.0)));
formular.sol1r.value = Math.round(10000000*(-term1 + 2.0*r13))/10000000;
formular.sol3r.value = formular.sol2r.value = Math.round(10000000*(-(r13 + term1)))/10000000;
return;
} // end if

// Raíces reales y distintas
q = -q;
aux = q*q*q;
aux = Math.acos(r/Math.sqrt(aux));
r13 = 2.0*Math.sqrt(q);
formular.sol1r.value = Math.round(10000000*(-term1 + r13*Math.cos(aux/3.0)))/10000000;
formular.sol2r.value = Math.round(10000000*(-term1 + r13*Math.cos((aux+2.0*Math.PI)/3.0)))/10000000;
formular.sol3r.value = Math.round(10000000*(-term1 + r13*Math.cos((aux+4.0*Math.PI)/3.0)))/10000000;
return;

} //Fin

1 Respuesta

Respuesta
-1

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas