Publicité
4
FAST bedeutet, daß Sie nur die endgültige Ausgabe sehen, die bei einer
8stelligen Primzahl rund 35 Sekunden dauert, bei anderen nicht so lange.
Wenn Sie Zeile 20 weglassen, dauert es ungefähr 2 Minuten und 20
Sekunden. Das abschließende SLOW soll nur ersparen, daß man den
omputer später wieder umstellen muß - das gehört sich so! (Die er
wähnten Zeitspannen gelten für die Zahl 11111117; bei anderen Zahlen
werden sie sich natürlicherweise verändern.)
5
Abwandlungen: Betten Sie das in eine Schleife ein und verwenden Sie
einen S ROLL-Befehl, um eine Anzeige der Primfaktoren von K, K+1,
K+2, ... und so weiter bis unendlich zu erhalten. (Beseitigen Sie das
FAST, sonst spielt der Bildschirm verrückt.)
6
K darf höchstens 8 Stellen haben, weil der ZX81 höhere Zahlen nicht
präzise genug bewältigt.
7
Dieses Programm könnte mathematisch leistungsfähiger gestaltet wer
den, zum Beispiel dadurch, daß man Vielfache von 3 oder 5 von Ver
suchs-Divisoren ausschließt. Können Sie das dazu verwenden, ein Pro
gramm schneller laufen zu lassen? Der Preis für mathematische Effizienz
ist vermehrte Programmgröße — gleicht der Gewinn den Verlust aus, wenn
Sie vorsichtig sind?
Jeder hat Programme zur Lösung quadratischer Gleichungen. Wie
wäre es damit?
GLEI HUNGEN DRITTEN GRADES
Dieses Programm errechnet alle echten Wurzeln kubischer Gleichungen oder
Gleichungen dritten Grades in der Form ax 3 +bx 2 +cx+d = 0 mit ziemlicher Ge
nauigkeit.
10
INPUTA
20
INPUT B
30
INPUT
40
INPUTD
50
LET B = B/A
60
LET
=
/A
70
LET D = D/A
80
LET X = 0
90
LETG = 2*X ' X*X+B*X*X~D
100
LET H = 3*X*X+2*B*X+
110
IF H = 0 THEN GOTO 200
120
IF ABS(X-(G/H))<1.E-8THEN GOTO 300
128
Publicité
