real a
real b
real delta

leia a
leia b


delta <- b^2 - 4ac
SE delta < 0:
    mostre "Não há raízes!"
SENAO
    x1 <- ( -b + sqrt(delta) ) / 2a
    mostre x1
    SE delta > 0:
        x2 <- ( -b - sqrt(delta) ) / 2a
	mostre x2