Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - el Fari

#1
Programación General / Delphi porcentaje
3 Marzo 2012, 04:53 AM
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);