hola! necesito 1 codigo :P

[[Lepe]]

Entonces el problema que tenemos no es de programación, es de matemáticas .

Bueno, no voy a ser malo, (de todas formas google te da la solucion)

Usa lo que en esa web dice "ecuación completa"

Ahora unas sugerencias:
- el cuadrado de un número, lo puedes obtener con la función Intpower de delphi
- la raiz cuadrada con sqrt(aqui_el_numero)
- El resto de operaciones, son las normales, comentar que uses "/" para la división con decimales.
- Ten cuidado al dividir, ya que si el divisor es cero, tu programa se quejará al realizar la división.

PD: aprende de memoria la dichosita fórmula, que puede ser pregunta de exámen, ahí verán si copiaste la fórmula sin más o te interesaste en el tema .

Saludos

[[egostar]]

Acotando lo que dice Lepe y Delphius, te piden 2 casillas porque las ecuaciones de segundo grado tienen la caracteristica de tener dos resultados.

x = (-b/2*a) +- (Raiz(b^2 - 4*a*c))/(2*a))

Esto se ve de dos formas

x1 = (-b/2*a) + (Raiz(b^2 - 4*a*c))/(2*a))
x2 = (-b/2*a) - (Raiz(b^2 - 4*a*c))/(2*a))

Edito

Creo que aqui hay un pequeño error

La ecuación sería así no Delphius

x = (-b +- (Raiz(b^2 - 4*a*c))/(2*a))

x1 = (-b + (Raiz(b^2 - 4*a*c))/(2*a))
x2 = (-b - (Raiz(b^2 - 4*a*c))/(2*a))

Salud OS

[kbaby]

Empezado por Lepe

Entonces el problema que tenemos no es de programación, es de matemáticas .

Bueno, no voy a ser malo, (de todas formas google te da la solucion)

Usa lo que en esa web dice "ecuación completa"

Ahora unas sugerencias:
- el cuadrado de un número, lo puedes obtener con la función Intpower de delphi
- la raiz cuadrada con sqrt(aqui_el_numero)
- El resto de operaciones, son las normales, comentar que uses "/" para la división con decimales.
- Ten cuidado al dividir, ya que si el divisor es cero, tu programa se quejará al realizar la división.

PD: aprende de memoria la dichosita fórmula, que puede ser pregunta de exámen, ahí verán si copiaste la fórmula sin más o te interesaste en el tema .

Saludos

*Cof.. Cof..* Ejem... la formula me la se ^^ lo que no se es como ponerla en el programa, llevo 2 o 3 dias con el y no he visto nada del otro mundo. Así que es por eso, de mates ando bien . Seguire leyendo post.

[kbaby]

Egostar creo que lo que me dijiste me funcionara, voy a probarlo.

A ver señores... me parece que porque tenga 14 años no parais de decirme que me estudie la formula o que es problema de matematicas... a ver... LA FORMULA ME LA SE -.- Y OPERO CON ELLA, ESO ES TEMARIO DE HACE 2 AÑOS. La programacion (informatica como asignatura) la empeze esta semana, y directamente fuimos a programar, y yo empiezo desde 0 con los ordenadores. Nunca los usé. No digais mas que estudie dichosa formula que me la se -.-.


GRACIAS EGOSTAR.

[[Delphius]]

¿Y cual es el problema?
Sigue continuando como venías haciendo, almacenando los valores en variables y operar con ellas de acuerdo a la fórmula.
Unas funciones que te van a sacar dolor de cabeza: Sqr, Sqrt.
Una es para elevar al cuadrado y la otra saca la raíz cuadrada.

Saludos,

[kbaby]

Aquí estoy, puse esto:

VAR a,b,c:integer;
x,y:real;
begin
a:=STRTOINT(edit1.text);
b:=STRTOINT(edit2.text);
c:=STRTOINT(edit3.text);
x:=(-b + (SQRT(b^2 - 4*a*c))/(2*a))
y:=(-b - (SQRT(b^2 - 4*a*c))/(2*a))
edit4.text:=inttostr(x);
edit5.text:=inttostr(y);
end;


Me da error, no se donde, pero....¿qué hago?

[[egostar]]

Empezado por Delphius

¿Y cual es el problema?
Sigue continuando como venías haciendo, almacenando los valores en variables y operar con ellas de acuerdo a la fórmula.
Unas funciones que te van a sacar dolor de cabeza: Sqr, Sqrt.
Una es para elevar al cuadrado y la otra saca la raíz cuadrada.

Saludos,

Efectivamente, lo que expresamos es como se debe de hacer, pero no funciona como código delphi, has lo que te dice Delphius de usar SQRT() y SQR().

Salud OS

[kbaby]

VAR a,b,c,d:integer;
x,y:real;
begin
a:=STRTOINT(edit1.text);
b:=STRTOINT(edit2.text);
c:=STRTOINT(edit3.text);
x:=(-b + (SQRT(SQR(b) - 4*a*c))/(2*a))
y:=(-b - (SQRT(SQR(b) - 4*a*c))/(2*a))
edit4.text:=inttostr(x);
edit5.text:=inttostr(y);
end;

Aja ^^ asi hice ^^ creo que lo puse bien no? Aunque sigue dando error. Lo pongo lo que dice:
Missing operator or semicolon
Missing operator or semicolon
Y otro quejandose del inttostr... (es muy largo jeje).

Gracias ! ^^

[kbaby]

Cambie INTTOSTR por FLOATTOSTR y funciona... no me acorde que X e Y son Reales ... lo siento ! ^^ Pero ahora sigue lo del error del semicolon T.T

Missing operator or semicolon

[[egostar]]

Empezado por kbaby

Cambie INTTOSTR por FLOATTOSTR y funciona... no me acorde que X e Y son Reales ... lo siento ! ^^ Pero ahora sigue lo del error del semicolon T.T

Missing operator or semicolon

Muy bien, te felicito, solo te falta un ; al final de cada una de las operaciones.

Salud OS