(Primzahltest, verbindliche Version für Aufgabe 19)
| 1 | LOAD 1 | Laden von x | |
| 2 | CSUB 1 | Berechnen von x-1 | |
| 3 | IF C0 = 0 GOTO 20 | Test, ob x<=1 | |
| 4 | CLOAD 2 | Laden des ersten Testteilers t=2 | |
| 5 | STORE 2 | Speichern des Testteilers t | |
| 6 | LOAD 1 | ||
| 7 | SUB 2 | Berechnen von x-t | |
| 8 | IF C0 = 0 GOTO 19 | Test, ob t < x | |
| 9 | LOAD 1 | ||
| 10 | DIV 2 | Die Befehle 9-14 berechnen den Rest | |
| 11 | MULT 2 | bei ganzzahliger Teilung von x durch t | |
| 12 | STORE 3 | ||
| 13 | LOAD 1 | ||
| 14 | SUB 3 | ||
| 15 | IF C0 = 0 GOTO 20 | Test, ob t Teiler ist | |
| 16 | LOAD 2 | ||
| 17 | CADD 1 | Erhöhen des Testteilers um 1 | |
| 18 | GOTO 5 | Start des nächsten Teilbarkeitstests | |
| 19 | CLOAD 1 | ||
| 20 | STORE 2 | Speichern des Ergebnisses | |
| 21 | END |
© 1997 Christian Borgelt
(
christian.borgelt@cs.uni-magdeburg.de),
letzte Änderung: 26.11.1997