hola! necesito 1 codigo :P

[[egostar]]

Empezado por kbaby

Muahaha sigue igual, maldita calculadora xD sigue igual jaja no se que le pasara. Siento darte dolor de CABEZA

PD: Hice el post despues de ver el edit ok? :P
PD2: Eso ya lo habia visto yo, lo del ) ... :P estoy aqui con la ecuacion en un papel, viendo en que falla el asunto xD, si me vieras, tengo todo con goma de borrar xD.

Pues mira, he ido probando lo que haces y tengo esto en mi código. Checa si hay alguna diferencia.

Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  a,b,c : integer;
  Resultado: Real;
begin
  a := strtoint(Edit1.Text);
  b := strtoint(Edit2.Text);
  c := strtoint(Edit3.Text);
  Resultado := (-b + (sqrt(sqr(b)-(4*a*c)))) / (2*a);
  ShowMessage(FloattoStr(Resultado));
  Resultado := (-b - (sqrt(sqr(b)-(4*a*c)))) / (2*a);
  ShowMessage(FloattoStr(Resultado));
end;

Salud OS

Edito:

, veo que te está faltando un ) eso es un error común, no te aflijas, para cada ( debes tener un ).