Tema: Elevando una cifra
Ver Mensaje Individual
  #2  
Antiguo 11-12-2008
[egostar] egostar is offline
Registrado
  
Registrado: feb 2006
Posts: 6.572
Reputación: 27
egostar Va camino a la fama
Hola

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(inttostr(round(35.459*0.1)*10));
  ShowMessage(inttostr(round(27.684*0.1)*10));
end;

Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita