Ich würde zunächst folgenden Typ deklarieren:
Delphi-Quellcode:
type
TSchulfaecher = (sfNone,sfEng,sfMa,sfDe{usw},sfInf,sfDs);
Dann kannst du ein Array machen machen
Delphi-Quellcode:
var
Noten: array[TSchulfaecher] of byte;
Byte, weil es wahrscheinlich performanter ist, in Punkten und nicht in Noten zu rechnen.
PS: Ungetestet, sollte aber gehen!