Autor:
Nadezhda Espada Flores 

¿Calcular las raices de una ecuacion de segundo grado(a²+bx+c=0)?
variables
a,b,c,x¹,x²
inicio
   leer a,b,c
      d_(b²)-(4*a*c)
      si a<>0 y d>=0 entonces
        x¹_(-b+sqrt(d))\(2*a)
        x²_(-b-sqrt(d))\(2*a)
        imprimir x¹,x²
      sino
          imprimir"no se efectua la operacion"
      fin si
fin