problema con funciones

[roman]

Empezado por seoane

Una costumbre que tengo al crear funciones es asignarle un resultado por defecto en la primera linea, así me aseguro de que la función no devuelve nada inesperado. Es algo personal, pero me atrevo a recomendarlo:

No está mal. El problema es que así te expones a otro warning:

Value assigned to 'divide' never used

si, por ejemplo, haces:

Código Delphi [-]
function divide(a, b: Integer): Integer;
begin
  Result := 0;

  if b <> 0 then
    Result := a div b
  else
    raise Exception.Create('Regrese a la primaria');
end;

Aunque menos "dañino", no me gusta que aparezca ninguna advertencia.

// Saludos