p = 17 (slider from 2 to 17, step 1)
g = 9 (slider from 2 to 17, step 1)
Text2: "Potenzen \quad für \quad " + g + ": \quad " + (Sequence[Mod[g^(i), p], i, 2, p - 1]) + " \quad mod \quad" + p
"Z_" + p + "^* = \{" + (Folge[i, i, 1, p - 1]) + "\}": "Z_{" + (LaTeX[p]) + "}^* = " + (LaTeX[Sequence[i, i, 1, p - 1]]) + ""
Text1: "Z_{" + (LaTeX[p]) + "}^* = " + (LaTeX[Sequence[i, i, 1, p - 1]]) + ""