Los parámetros OUT tienen su utilidad; por ejemplo, para aquellas funciones o ecuaciones matemáticas que tienen más de una solución como es el caso de las ecuaciones de segundo grado:
Código Delphi
[-]
FUNCTION EcuacionGrado2 (a, b, c: REAL; OUT x1, x2: REAL): BOOLEAN;
VAR
Delta: REAL;
BEGIN
RESULT := FALSE
IF (2 * a) <> 0 THEN
BEGIN
Delta := (b * b) - (4 * a * c);
IF Delta >= 0 THEN
BEGIN
RESULT := TRUE;
Delta := sqrt (Delta);
b := b * (-1);
x1 := (b + Delta) / (2 * a);
x2 := (b - Delta) / (2 * a);
END;
END;
END;