calculadora Convergente de numero

[Cartel]

Empezado por 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.

se esa seria buna pero toy en lo mismo ya q si el 1 = 0.2 el 2 = 0.4 y el 3= 2.4 como se aria ya q si coloco el 3 me va a no me daria la multiplicacion x 2.4 sino x 0.6