eine Möglickeit:
machst Dir einen String
s mit dem Inhalt
'abcdefg...xyz'
und eine Array of Integer
aPrim mit Deinen Primzahln [2,3,5....]
dann kannst Du mit
aPrim[pos('a',s)] = primzahl von a
daraufzugreifen.
Das alles dann in ein Schleife bauen
Delphi-Quellcode:
for i:=1 to length(name) do
zahl1:=zahl1*aPrim[pos(name[i],s)];
Nur ein Ansatz.
Wie sinnvoll das ganze ist, sei mal dahingestellt.
Grüße
Klaus