Die Potenzen von a modulo n
Author: Dörte Haftendorn

Beobachte, für welche a die 1 erreicht wird und für welche nicht.
Wann entstehen unsymmetrische und wann symmetrische Streckenzüge?
Wann entsteht gar kein Streckenzug?

Haftendorn 08

0

Die Potenzen von a modulo 14.

Stelle erst n ein.
Variiere dann a.

a = 3 (slider from 1 to 30, step 1)
n = 14 (slider from 1 to 30, step 1)
r = 4 (slider from 1 to 30, step 0.1)
P = Sequence((r * cos(t * 2.0 * 3.14 / n - 3.14 / 2.0), r * sin(t * 2.0 * 3.14 / n - 3.14 / 2.0)), t, 1.0, n)
O = Intersect(xAxis, yAxis)
c = Circle(O, r)
B: (0.0, -(r))
li = Sequence(Segment[Element[P, Mod[a^(t), n]], Element[P, Mod[a^(t + 1.0), n]]], t, 1.0, n + 1.0)
f(x) = a * x
pot = Sequence(Mod[Iteration[f(x), 1.0, k], n], k, 1.0, n - 1.0)
Zahl_1 = Element(P, 1.0)
Zahl_a = Element(P, a)