PDA

Ver la Versión Completa : sumar reales


migueilichenco
01-12-2004, 16:07:27
hola como estasn a todos, ase mucho no posteaba un hilo, por que estado lejos de internet, bueno nesesito una pequeña ayuda, el problema es que no se como sumar reales, es decir por ejemplo cuando queria sumnar numeros naturales lo hacia de la siguiente manera

/////////////////////////////////////////
var
a,b,c,d,e:real;
f:integer;
begin
a:=strtoint(edit3.Text);
b:=strtoint(edit4.Text);
c:=strtoint(edit5.Text);
d:=strtoint(edit6.Text);
e:=strtoint(edit7.Text);
e:=a+b+c+d;
f:=e;
edit7.Text:=inttostr(f)
end;
/////////////////////////////////////////

Pero en cambio para reales como 1.6 o 0.4, como podria hacer para sumarlos y mostrar resultado, gracias de antemano por su respuesta

roman
01-12-2004, 16:25:01
Te daras cuenta que tu pregunta no es cómo sumar reales sino como convertir cadenas en reales. Para ello puedes usar la función StrToFloat.

// Saludos