# Notendurchschnitt mehrere Schularbeiten

## Problembeschreibung

*****************************************
Dokumentnummer: D1185
Quelle: Johann Weilharter,
              Stochastik
*****************************************
Für eine gegebene Anzahl (n) von Schularbeiten, wo man jeweils die absoluten
Häufigkeiten kennt, sollen die Notendurchschnitte berechnet werden.

x:[1,2,3,4,5];

## Problemlösung

EINGABE

h:read("Gib die Liste mit den Häufigkeitslisten ein");

VERARBEITUNG 1

n:length(h);

for i:1 thru n do ev(H[i]:sum(h[1][i],i,1,5));

AUSGABE 1

for i:1 thru n do print(H[i],"Teilnehmer bei Schularbeit Nr.",i)$

VERARBEITUNG 2

for i:1 thru n do ev(p[i]:h[i]/H[i]);

AUSGABE 2

for i:1 thru n do print("Wahrscheinlichkeitsverteilung Nr.",i,"=",p[i])$

VERARBEITUNG 3

load(vect);

for i:1 thru n do ev(m[i]:x.p[i]);

for i:1 thru n do ev(m[i]:m[i],numer);

for i:1 thru n do ev(m[i]:floor(m[i]*1000+0.5)/1000.0);

AUSGABE 3

for i:1 thru n do print("Notendurchschnitt der Schularbeit Nr.",i,"=",m[i])$