Delphi-Quellcode:
n:= 1;
For i:=1 to a Do
begin
n:= n*a;
end;
setLength(El,a);
setLength(Mo,n);
setLength(Re,n,a);
setLength(Vo,a);
Nach der Schleife entspricht n = a^a, was bei a=8 schon 2^24 = 16777216 entspricht. Vielleicht sollte man in diese Richtung mal weiter forschen.
Bei Kombinatorik muss man etwas aufpassen was den benötigten Speicherplatz betrifft.