Ja annvännôr CASIO cfx-9800G, sô dä ä dänn
miniräknôrn sôm ä mäjn pörposs för dänn här sia.
Dä kommer te finnôs liit ann ogg, sôm gräjjjôr te HP48G - en avônsvärl maskin
-.
Newton-Raphson
Euclidean Algorithm
ellôr ladd hem casio.zip mä aall programma sôm täxt.
Ja hållôr på å byggör en Casio te PC kretts.
När han ä färdi sô säljör ja ôn te den sôm vill kööp.
Di här programma ä joord av mig Stefan Sonesson.
Du får göör va'ru vill mä'rôm utôm å lätt dôm stääd hos dä.
Ja tyckôr int ôm städing : (
==============
Förklaringör
==============
Du måst spaar funktion du ska annvänn i funktionsminn 3 "f3".
Ellôr editeer programme å innehôll nôn annôn plass.
f3 'shift+F-MEM', F3, 3
~ 'shift+PRGM', F5
-> piil ôvvafôr "DEL" -knappôn
=> 'shift+PRGM', F1, F1
<> 'shift+PRGM', F2, F2
"Newton-Raphson"
"Enter X0:"?->X
Lbl 0
X->A
X-f3÷d/dx(f3,X)->X
A<>X=>Goto 0
A
"Euclidean"
"GCD(A,B)"
1->B
"Greatest Integer A"
?->A
"Smallest Integer B"
?->B
A->G:B->H
Lbl 1
B=0=>Goto 0
A÷B->C
Int C->C
B*C->D:D->J
A-D->E
E=0=>Goto 3
E->F:A->I:B->A:E->B
E>0=>F~
Goto 1
Lbl 2
B~
Lbl 3
"Finished"