Aupi,
bien, ahora, desde donde llamo a la función?? ya que me dice que el identificador 'Result' no lo encuentra...
He puesto lo siguiente (la funcion tal y como me comentais), pero la llamo asi:
Código Delphi
[-]
write(absoluto ('El resultado es: ', [resultado], ' cm cuadrado'); readln;
De todas maneras, porqué la necesidad de hacerlo con una función en lugar de un procedimiento??
Acabo de encontrar en un libro de Delphi 2006, el siguiente procedimiento:
Código Delphi
[-]
procedure MakeAbsolute(Num: integer);
begin
if Num < 0 then
Num := -Num;
WriteLn('Valor absoluto = ', Num);
end;
Por eso no entiendo la necesidad de hacerlo mediante una función en lugar de un procedimiento como este, si los dos tienen la misma función, no?
Un saludo,
Gracias.