Pedir los coeficientes de una ecuacion de 2º grado, y muestre sus solucion reales. Si no existen, debe indicarlo
Respuestas a la pregunta
Contestado por
0
Aquí tengo un algoritmo para eso en SL
varraiz1, raiz2, discriminante, a, b, c : numericoinicio cls() imprimir ("\n Ingrese el valor para a ") leer (a) imprimir ("\n Ingrese el valor para b ") leer (b) imprimir ("\n Ingrese el valor para c ") leer (c) discriminante =sqrt(b^2-4*a*c) raiz1= (-b+discriminante)/(2*a) raiz2= (-b-discriminante)/(2*a) si (discriminante>0) { imprimir ("\n La primera raíz es= ", raiz1) imprimir ("\n La primera raíz es= ", raiz2)} si(discriminante<0) { imprimir ("\n No hay raiz") }
fin
varraiz1, raiz2, discriminante, a, b, c : numericoinicio cls() imprimir ("\n Ingrese el valor para a ") leer (a) imprimir ("\n Ingrese el valor para b ") leer (b) imprimir ("\n Ingrese el valor para c ") leer (c) discriminante =sqrt(b^2-4*a*c) raiz1= (-b+discriminante)/(2*a) raiz2= (-b-discriminante)/(2*a) si (discriminante>0) { imprimir ("\n La primera raíz es= ", raiz1) imprimir ("\n La primera raíz es= ", raiz2)} si(discriminante<0) { imprimir ("\n No hay raiz") }
fin
Otras preguntas