# Schularbeitsnoten gewichten

## Problembeschreibung

******************************************
Dokumentnummer: D1504
******************************************
Ein Programm zur Gruppierung von Schularbeitsnioten
ist zu erstellen.

## Problemlösung

EINGABE

noten:read("Gib eine Liste mit Schularbeitsnoten ein");

VERARBEITUNG

n:length(noten);

z1:0;
z2:0;
z3:0;
z4:0;
z5:0;

for i thru n do (
                 if noten[i] = 1 then z1:z1+1,
                 if noten[i] = 2 then z2:z2+1,
                 if noten[i] = 3 then z3:z3+1,
                 if noten[i] = 4 then z4:z4+1,
                 if noten[i] = 5 then z5:z5+1
                       );

AUSGABE

print("Sehr gut              ",z1)$
print("Gut                       ",z2)$
print("Befriedigend      ",z3)$
print("Genügend          ",z4)$
print("Nicht genügend",z5)$