Código Delphi [-] var ip,op,res:Real; begin ip:= strtofloat(edit1.text); op:= strtofloat(edit2.text); res:= ip + op; label1.caption:= '$ ' + Floattostr(res); edit3.Text:= '$ ' + Floattostr(res);
var ip,op,res:Real; begin ip:= strtofloat(edit1.text); op:= strtofloat(edit2.text); res:= ip + op; label1.caption:= '$ ' + Floattostr(res); edit3.Text:= '$ ' + Floattostr(res);