Delphi porcentaje

Iniciado por el Fari, 3 Marzo 2012, 04:53 AM

0 Miembros y 1 Visitante están viendo este tema.

el Fari

como sumar 3 numeros en Delphi y dividirlos entre 3? Lo hice de esta forma y tengo duda!?
var
  Form1: TForm1;
  mat, his, eng: integer;
  res:real;



implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
mat:=strtoint(edit1.Text);
his:=strtoint(edit2.Text);
eng:=strtoint(edit3.Text);
edit4.Text:=strtoint(edit1.Text+edit2.Text+edit3.Text)/3;
res:=strtoint(res);

$Edu$

Pero larga error o solo tenes duda? xD si no larga error y anda que duda tenes?

Lo mejor que podes hacer es mirar un buen tutorial y aprender bien como se debe, porque estas haciendo cosas sin sentido, como usar variables que despues no las usaras en la suma.. y confundes cuando necesitas para a Integer y cuando a String