IFCE

Trabalho de Programação Estruturada

Equipe: Andressa Isaías, Elaine Cristina, Luiza Maiara, Pedro Gabriel e Sara Mickelle

13 de Abril de 2009

FASE I

Algoritmo

Algoritmo "Equação do 2º Grau"

// Função : Obter as raízes de uma equação do segundo grau, tal que o delta dê maior do que Zero.

// Autor : P-SAME

// Data : 20/03/2009

var

delta,a,b,c,x1,x2:real

inicio

escreval("Equação do Segundo Grau")

escreval("ax²+bx+c=0")

escreval

escreva("digite a: ")

leia(a)

escreva("digite b: ")

leia(b)

escreva("digite c: ")

leia(c)

delta<-((b*b)-4*a*c)

x1<- (-b +raizq(delta))/(2*a)

x2<-(-b -raizq(delta))/(2*a)

escreval("x1=",x1)

escreval("x2=",x2)

fimalgoritmo