MIDRANGE - Mittelwert

Die MIDRANGE-Funktion liefert das arithmetische Mittel (Durchschnittswert) aus dem niedrigsten und dem höchsten angegebenen Argumentwert.
Funktionstyp: numerisch.

Format

---

FUNCTION MIDRANGE ({argument-1}...)

---

Argument

1. argument-1 muss der Klasse numerisch angehören.

Returnwerte

1. Der Returnwert ist der arithmetische Mittelwert aus dem höchsten und dem niedrigsten der angegebenen Argumentwerte. Der Wertevergleich zur Bestimmung des höchsten und niedrigsten Wertes erfolgt nach den Regeln für einfache Bedingungen (siehe Abschnitt „Bedingungen").

2. Der Fehler-Returnwert ist 0.

Siehe auch: MIN, MAX, RANGE, MEAN, MEDIAN, SUM

Beispiel 9-27

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  R PIC 999V999.
01  RES PIC 999.999.
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    COMPUTE R = FUNCTION MIDRANGE (12 32 5 8 17 9).
    MOVE R TO RES.
    DISPLAY RES UPON T.
    STOP RUN.

Ergebnis:              018.500