Table of Contents
Advertisement
Chapter 8: Application Examples
Program code
Z=Z≥+Z√+Z...
R≥=Z≥Z√©Z
Print R≥
Wait
R√=Z√Z...©Z
Print R√
Wait
R...=Z...Z≥©Z
Print R...
End
Label YTOD
R=R≥R√+R√R...+R...R≥
Z≥=R©R√
Print Z≥
100
Key operations
; Z ; = @ v Z1
e e + @ v d Z2
e e + @ v d
d Z3 e e e
@ v d d d R1 e
e ; = @ v 0
@ v 1 z ; Z e
i 0 @ v 3 e
i 3 e
@ v d d d d R2
e e ; = @ v
1 @ v 2 z ; Z
e
i 0 @ v 4 e
i 3 e
@ v d d d d
d R3 e e ; = @
v 2 @ v 0 z
; Z e
i 0 @ v 5 e
i 5 e
i 6 @ a YTOD ;
e
; R ; = @ v 3
@ v 4 + @ v
4 @ v 5 + @
v 5 @ v 3 e
@ v 0 ; = ; R
z @ v 4 e
i 0 @ v 0 e
Advertisement
Table of Contents
