calculadora Convergente de numero

[olbeup]

Que tal esto:

Código Delphi [-]
...
var
  E1: Integer;
  E2, E3: Extended;
begin
  E1 := StrToInt(Edit1.Text);
  E2 := (StrToInt(Edit2.Text) * 0.2);
  E3 := (E1 * E2);
  Edit3.Text := FormatFloat('0.00', E3);
end;

Un saludo.