ALGORITMO

Como resolver ecuaciones de segundo grado por la formula

1)      Saber el valor de los números reales (a, b y c)

2)      Sustituir estos valores en la formula 

·         Multiplicar “a” por 4

·         El resultado multiplicarlo por “c”

·         Elevar “b” al cuadrado

·         Restar el resultado de “b” al cuadrado y restarle el resultado de “a” por 4 por “c”

·         Sacarle raíz cuadrada a todo lo anterior

·         Y sumarle al resultado “-b”

·         Y eso dividirlo entre dos veces “a”

VIDEO DE PROGRAMACION

Diagrama de Flujo

PROGRAMACION EN PASCAL

Pascal es un lenguaje de programación desarrollado por el profesor suizo Niklaus Wirth entre los años 1968/9 y publicado en 1970. Su objetivo era crear un lenguaje que facilitara el aprendizaje de programación a sus alumnos, utilizando la programación estructurada y estructuración de datos. Sin embargo con el tiempo su utilización excedió el ámbito académico para convertirse en una herramienta para la creación de aplicaciones de todo tipo.
Pascal se caracteriza por ser un lenguaje de programación estructurado fuertemente tipificado. Esto implica que:

1. El código está dividido en porciones fácilmente legibles llamadas funciones o procedimientos. De esta forma Pascal facilita la utilización de la programación estructurada en oposición al antiguo estilo de programación monolítica.
2. El tipo de dato de todas las variables debe ser declarado previamente para que su uso quede habilitado.

El nombre de Pascal fue escogido en honor al matemático Blaise Pascal.

ECUACION DE SEGUNDO GRADO PROGRAMACION EN PASCAL

PROGRAM formula_general;
USES crt;
VAR
a,b,c,raiz,valor1,valor2:real;
BEGIN
clrscr;
writeln('teclea el valor de a:');
readln(a);
writeln('teclea el valor de b');
readln(b);
writeln('teclea el valor de c');
readln(c);
raiz:=b*b-4*a*c;
IF raiz>=0 then
BEGIN
Valor1:=(-b+sqrt(raiz))/(2*a);
Valor2:=(-b-sqrt(raiz))/(2*a);
write('x1: ',valor1:1:2);
readln;
write('x2: ',valor2:1:2);
readln;
END
ELSE
writeln('La ecuacion no tiene solucion');
END.

integrantes del equipo

-Julio César Anaya Martinez
-Christopher Hernández Reséndiz
-José Ángel Colín Núñez
-Samuel I. Evaristo Olivares
-Garcia Trejo Marco Antonio