[[coso]]

Hola,
deberas usar una funcion, la cual te devuelva un valor especifico:

Código Delphi [-]
 
function Solver(a,b,c : integer) : double;
begin
   Solver := a + b + c;
end;
...
var 
    x : double;
begin
    x := Solver(3,2,1);
    ShowMessage(FormatFloat('0.00',x));
end;

yo de ti le echaria un vistazo largo a algun tutorial sobre funciones y procedimientos, porque es algo muy basico y bastante necesario en programacion. Un saludo.