[ Foro de Pascal ]

sumar decimales con lazarus

15-May-2024 08:21
carlos_lalo88 orrego
0 Respuestas


este codigo suma enteros como modificaria para que sume reales o decimales
con lazarus de 64 bits y la ultima version?

procedure TForm1.Button1Click(Sender: TObject);

 var n1,n2,suma : integer;
begin
n1:= StrToint(edit1.Text);
n2:= Strtoint(edit2.text);
suma:=n1+n2;
edit3.text:=inttostr(suma)
end;




Si ya eres usuario del sistema, puedes contestar desde tu cuenta y así ganar prestigio.

Si sólo eres un visitante, puedes optar por...