1. | berechne m in n-1 = 2lm (m ungerade) | |||
2. | wähle zufällig ein x mit 1 <= x < n | |||
3. | x0 = xm mod n | |||
4. | if x0 = 1 or x0 = n-1 | |||
5. | then write("n ist eine Primzahl"); goto ENDE | |||
6. | end | |||
7. | for i = 1 to l-1 do | |||
8. | xi = xi-12 mod n | |||
9. | if xi = n-1 | |||
10. | then write("n ist eine Primzahl"); goto ENDE | |||
11. | else if xi = 1 | |||
12. | then write("n ist zusammengesetzt"); goto ENDE | |||
13. | end | |||
14. | end | |||
15. | end | |||
16. | write("n ist zusammengesetzt") | |||
17. | ENDE |
2.3.2 Große Primzahlen erzeugen |