ZXTape! 2  *Numbers at Work - Application Program TapeCollins EducationalTriptych Publishing Ltd1985English Educational14.95NoneOriginalxTZXed by Andrew Barker For Tony Barnett Slight differences in BASIC from existing WoS TZX. Alternate/Earlier version ?apply ^ TT` space 7:7:7: "" (0,0; 2"" pac1lapply dH 00`?Ǐ?x|<?xx{|Ǐ>x|?|xy<`0`8p ?|xy8<?~xx ?<?xxx??>???x??00``<<???Ǐ|?x|<|?@??? q0"x@`@?? @.?Ǎl\t??# 0@?xB@` C$?? @?BG@B$??a @?BD@B$?#;8;???xaN zz:5:z:z:1190 tz$" "1130j ~-11 +o,6;" " o=o+w:o=9 o=w -11 +o,6;" "  1130j o=w3010 o=b3510 o=34010 o=44510 o=55010 o=65510 o=76010z o=86510n qq=13 1010  2020 Ygo=653302:st=23613=\+256*23614>\:st,go-256*(go/256) &st+w,(go/256):2040:gg i=gogo+gg-w:gg:i,gg:i 33!,33!,3,19,58:,58:,92\,254,20,40(,4,254,12 ,32 ,15,33! .go-256*(go/256),(go/256)  229,253,546,0,255,253,203,1,174,195,125},27,229,195,3,19,13 qq  1000 menu=z3025 menu=b1000 menu=z:n(4):f(4) 58000@:14,19;"0.";:p=w p=p-w:7000X p=c(o)+w3000 9700% 2 z:7:z:pt=(p4):mt=w:9300T$ !12 ,19;" "; 7410 flag=z (f(w)=zf(b)=zf(3)z3300 'f(3)=zf(4)z3370* (f(3)=zn(w)zn(b)z3360 'f(4)=zf(3)z33804 flag3200 +f(w)=wf(b)=wf(3)=b:f(4)=b -7420:8:8:z:3025 8 n(w)=(.5+n(3)*.1}L):n(b)=1000 /fac=w:max=n(w):max>100dmax=100d fac=fac+w `(n(w)/fac)=n(w)/facƺ(n(b)/fac)=n(b)/facn(w)=n(w)/fac:n(b)=n(b)/fac:fac=fac-w:3320 facmax+w3320 On(b)>1000n(b)=(.5+n(b)/b):n(w)=(.5+n(w)/b):3345 6n=w:val=n(w):9000(#:n=b:val=n(b):9000(# >n=3:val=(.5+10000'*n(w)/n(b)):9000(# *=n=3:val=(.5+n(4)*100d):9000(# 41n=4:val=n(3)/100d:9000(# menu=z3525 menu=b1000 n(13 ):f(13 ) 8000@:p=7 p=p-w:7000X p=c(o)+w3500 9700% ( z:7:z:pt=z:mt=w:9300T$ 7410 p=7i=n(7)+w5:n=i:f(n)=3:val=z:9000(#:n=i+7:f(n)=3:val=z:9000(#:i:f(7)=3 flag=z .n=z:nz=z:i=w6:f(i)=zn=i:nz=nz+w $+i:nz=wn63800:36408 .nz=wn=63820 85n=z:nz=z:i=813 :f(i)=zn=i:nz=nz+w B,i:nz=wn13 3840:3670V Ln=13 nz=w3860 Vratio=z:i=w6 `J(f(i)=wf(i)=b)(f(i+7)=wf(i+7)=b)ratio=n(i)/n(i+7) ji:ratio=z3730 t5i=w6:f(i)=zf(i+7)zn=i:3830 ~0f(i)zf(i+7)=zn=i+7:3870 i i=87+n(7) f(i)=zi=20 f(i-7)zi=20 i i<203900< flag3600 -7420:8:8:z:3525 0val=n(6):j=w5:jnval=val-n(j) j:9000(# <val=n(w)+n(b)+n(3)+n(4)+n(5):9000(# $val=n(i+7)*ratio:9000(# 8val=n(13 ):j=812 :jnval=val-n(j)  j:9000(# Kval=n(8)+n(9 )+n(10 )+n(11 )+n(12 ):9000(# val=n(i)/ratio:9000(# <min=10000':i=87+n(7):f(i-7)=b:n(i-7)=(100d*n(i)+.5):(n(i-7))min+wi=wn(7):n=i:val=n(i):9000(#:i: d@i=wn(7):((n(i)/fac)-n(i)/fac)>.001wni=10 ni:i>83930Z xQi=wn(7):n(i)=n(i)/fac:i:fac=fac-w:min=(min^2/fac):3930Z menu=z4025 menu=b1000 Nn(11 ):f(11 ):f(10 )=w:f(11 )=w:n(11 )=15 48000@:14,30;"0";:p=w p=p-w:7000X p=c(o)+w4000  9700% ( z:7:z:pt=z:mt=w:9300T$  7410 hflag=z m*f(w)=zf(b)zf(3)z4325 r0f(w)=zf(8)zf(3)z4330 t*f(w)=zf(b)zf(8)z4342 u*f(w)=zf(b)zf(9 )z4343 w*f(b)=zf(w)zf(3)z4335 |0f(b)=zf(3)zf(9 )z4340 0f(b)=zf(1)zf(8)z4345 *f(b)=zf(w)zf(9 )z4347 *f(3)=zf(w)zf(b)z4350 6f(3)=zf(4)zf(5)z4355 7f(4)=zf(3)zf(10 )z4360 7f(4)=zf(5)zf(10 )z4365  6f(4)=zf(3)zf(5)z4370 6f(5)=zf(3)zf(4)z4375 6f(5)=zf(6)zf(7)z4380 7f(5)=zf(6)zf(11 )z4385! 7f(6)=zf(5)zf(11 )z4390& 7f(6)=zf(7)zf(11 )z4395+ 6f(7)=zf(5)zf(6)z44000 7f(7)=zf(6)zf(11 )z44055 *f(8)=zf(w)zf(b)z4410: 0f(9 )=zf(b)zf(3)z4415? 7f(10 )=zf(3)zf(4)z4420D 7f(11 )=zf(5)zf(6)z4425I 7f(11 )=zf(6)zf(7)z4430N flag4200h )f(8)=wf(9 )=zf(9 )=b )f(9 )=wf(8)=zf(8)=b *n(b)=zf(b)=wf(8)=zf(8)=b *n(b)=zf(b)=wf(9 )=zf(9 )=b -7420:8:8:z:4025 &n=w:val=n(3)-n(b):9000(# :n=w:val=n(3)/(w+n(8)/100d):9000(# &n=b:val=n(3)-n(w):9000(# 6n=b:val=n(3)*n(9 )/100d:9000(# 0n=w:val=n(b)*100d/n(8):9000(# 6n=w:val=-n(b)+n(b)*100d/n(9 ):9000(# 0n=b:val=n(w)*n(8)/100d:9000(# =n=b:val=n(w)*n(9 )/(100d-n(9 )):9000(# &n=3:val=n(w)+n(b):9000(# 2n=3:val=n(5)+n(4):9000(# =n=4:val=n(3)*n(10 )/100d:9000(#  Kn=4:val=n(5)*n(10 )/(100d-n(10 )):9000(# 2n=4:val=n(3)-n(5):9000(# 2n=5:val=n(3)-n(4):9000(# 2n=5:val=n(7)-n(6):9000(# !=n=5:val=n(6)*100d/n(11 ):9000(# &=n=6:val=n(5)*n(11 )/100d:9000(# +Kn=6:val=n(7)*n(11 )/(100d+n(11 )):9000(# 02n=7:val=n(5)+n(6):9000(# 5An=7:val=n(6)*(w+100d/n(11 )):9000(# :0n=8:val=n(b)*100d/n(w):9000(# ?6n=9 :val=n(b)*100d/n(3):9000(# D=n=10 :val=n(4)*100d/n(3):9000(# I=n=11 :val=n(6)*100d/n(5):9000(# NJn=11 :val=n(6)*100d/(n(7)-n(6)):9000(# menu=z4525 menu=b1000  9500% En(14):f(14):f(3)=b:f(7)=b:f(12 )=b 8000@:3,z;"Tax and N.I. rates are those in effect following the 1984 Budget";6,z;"Use CHANGE RATES to update them.";:p=1 p=p-w:7000X p=c(o)+w4500 $p=149810R&:4515  9700% ( z:7:z:pt=z:mt=w:9300T$  7410 flag=z 6n=w4:f(n)=zf(n+8+(n>w))z4800 n 6n=58:f(n)=zf(n-4)z4805  n On=9 13 :n10 f(n)=zf(n-4-(n>10 ))z4810 n Rf(9 )zf(10 )zf(11 )=zf(12 )=zf(13 )=z4815  Rf(9 )zf(10 )=zf(11 )zf(12 )=zf(13 )=z4820 %Rf(9 )zf(10 )=zf(11 )=zf(12 )=zf(13 )z4850 *Rf(9 )=zf(10 )zf(11 )=zf(12 )=zf(13 )z4875  /Rf(9 )=zf(10 )zf(11 )zf(12 )=zf(13 )=z4900$ 4flagmenu34600 >+f(3)=b:f(7)=b:f(12 )=b HNf(b)=wf(6)=wf(11 )=wf(4)=b:f(8)=b:f(13 )=b RNf(4)=wf(8)=wf(13 )=wf(b)=b:f(6)=b:f(11 )=b \C7420:8:8:z:menu=3menu=w:4510 f 4525 -val=n(n+8+(n>w))/524:9000(# 0val=n(n-4)*524/12 :9000(# 4val=n(n-4-(n>10 ))*12 :9000(# Ϫgross=n(9 ):allow=n(10 ):4955[:4985y:n=11 :val=tax:9000(#:n=12 :val=ins:9000(#:n=13 :val=gross-tax-ins:9000(# ?gross=n(9 ):4985y:n=12 :val=ins:9000(# a0=z:a1=gross:count=z allow=(a0+a1)/b:4955[ y(n(11 )-tax)307430:menu=3: count=count+w 'tax>n(11 )a0=allow:4830 a1=allow:4830 ?gross=n(9 ):4980t:n=12 :val=ins:9000(# a0=z:a1=gross:count=z allow=(a0+a1)/b:4950V:(n(9 )-tax-n(12 )-n(13 ))307430:menu=3: count=count+w >n(9 )-tax-n(12 )>n(13 )a1=allow:4860 a0=allow:4860  4g0=z:g1=1000000t$:allow=n(10 ):count=z Bgross=(g0+g1)/2:4950V:4980t:net=gross-tax-ins z(n(13 )-net)307430:menu=3: count=count+w 'net>n(13 )g1=gross:4880 g0=gross:4880 $4g0=z:g1=1000000t$:count=z:allow=n(10 ) ) gross=(g0+g1)/b:4950V:(tax-n(11 ))307430:menu=3: ,count=count+w .'tax>n(11 )g1=gross:4905) 3g0=gross:4905) [t1=gross-allow:tax=z `i=w6:t1=z4975o e!tax=tax+t1*t(i,b):t1=t1-t(i,w) j t1i(b)ins=i(b)*i(3): ins=gross*i(3): menu=z5025 menu=b1000 n(6):f(6) 8000@:p=w p=p-w:7000X p=c(o)+w5000  9700% ( z:7:z:pt=z:mt=w:9300T$  7410 Pflag=z Z.f(w)=zf(3)zf(5)z5300 _.f(w)=zf(4)zf(6)z5305 `;f(w)=zf(b)0f(5)zf(6)z5307 d.f(b)=zf(3)zf(4)z5310 n.f(3)=zf(b)zf(4)z5320 x.f(3)=zf(w)zf(5)z5330 .f(4)=zf(b)zf(3)z5340 .f(4)=zf(w)zf(6)z5345 .f(5)=zf(w)zf(3)z5350 .f(6)=zf(4)zf(w)z5355 flag5200P -7420:8:8:z:5025 6n=w:val=n(3)*100d/n(5):9000(# 6n=w:val=n(4)*100d/n(6):9000(# 9n(6)=n(5)n(6)=n(5)+.001wn In=1:val=100d*n(2)/(n(6)-n(5)):9000(# ,n=b:val=n(4)-n(3):9000(# ,n=3:val=n(4)-n(b):9000(# 6n=3:val=n(w)*n(5)/100d:9000(# ,n=4:val=n(b)+n(3):9000(# 6n=4:val=n(w)*n(6)/100d:9000(# 6n=5:val=100d*n(3)/n(w):9000(# 6n=6:val=n(4)*100d/n(w):9000(# |menu=z5525 menu=b1000 8n(9 ):f(9 ):i=w9 :n(i)=z:f(i)=z:i U8000@:7300:3,0;"Set ""Comments"", then enter data.";:p=b p=p-w:7000X p=c(o)+w5500| 5p=b7400:7600:9290J$:5525 ;p=37400:7700:9290J$:5525 ;p=47400:7800x:9290J$:5525 ;p=9 7400:7900:9290J$:5525 Jf(b)=3:f(3)=3:f(4)=3:f(9 )=3  9700% ( z:7:z:pt=z:mt=w:9300T$  7410 !ptype=z5620:5560 !itype=z5600:5560  5640 C7420:8:8:z:menu=3menu=w:5510  5525 Dflag=z:ref=(f(w)z):i=w4:ref=ref+(f(i+4)z)*b^i:i 1ref=75900 :59404:5611 2ref=11 5830:59404:5611 2ref=195885:5900 :5611 2ref=13 5760:59404:5611 2ref=215770:5900 :5611 2ref=255840:5760:5611 2ref=1459404:5710N:5611 2ref=225710N:5900 :5611 2ref=265860:5710N:5611 &ref=285780:5710N flag5600  Dflag=z:ref=(f(w)z):i=w4:ref=ref+(f(i+4)z)*b^i:i 1ref=75910:5960H:5629 2ref=11 5850:5960H:5629 2ref=195885:5910:5629 2ref=215770:5910:5629 2ref=255850:5770:5629 2ref=145950>:5710N:5629 2ref=225710N:5910:5629 &ref=285790:5710N flag5620 0f(w)=wf(6)=wf(7)=zf(7)=b 0f(w)=wf(7)=wf(6)=zf(6)=b 6f(5)=wf(7)=wf(8)=zf(8)=b 6f(5)=wf(8)=wf(7)=zf(7)=b *f(6)=wf(7)=wf(w)=zf(w)=b 6f(7)=wf(8)=wf(5)=zf(5)=b  Dflag=z:ref=(f(w)z):i=w4:ref=ref+(f(i+4)z)*b^i:i  1ref=75920 :59404:5651  2ref=11 5870:59404:5651  2ref=195925%:5880:5651  2ref=13 5800:59404:5651 2ref=145720X:59404:5651 2ref=225930*:5720X:5651 2ref=265880:5720X:5651 &ref=285810:5720X flagmenu35640 0f(w)=wf(7)=wf(8)=zf(8)=b >f(w)=wf(8)=wf(7)=zf(6)=b:f(7)=b *f(7)=wf(8)=wf(w)=zf(w)=b 0f(w)=wf(6)=wf(8)=zf(8)=b *f(6)=wf(8)=wf(w)=zf(w)=b  NGn=w:val=n(8)*per*100d/(n(5)*n(6)):9000(# Xin0=z:in1=100d:count=z bLint=(in0+in1)/b:5890:(val-n(6))307430:menu=3: hcount=count+w l%val:n=8:val=n(7)*n(5)*ppy/per:9000(# HGn=8:val=n(w)*n(5)*n(6)/(per*100d):9000(# \+ sol=(-bb+(bb^b-4*aa*cc))/(b*aa): pmenu=z6025 umenu=b1000 z2l(10 ):r(10 ):n(2):f(3) 8000@:p=w p=p-w:p1=z:7000X 9p1zz:7:z:pt=z:mt=w:9400$:6055 p=c(o)+w6000p  9700% ( z:7:z:pt=z:mt=w:9300T$  7410 Gn(w)zn(b)z62008:6210B:f(3)=3:6180$ &y1=z:y2=z:lf=z:rf=z:i=w10 ,l(i)zy1=i:i=10 :lf=w:6125  r(i)zy1=i:i=10 :rf=w i:y1=z6180$ #lfn(w)z6240`:6100 #rfn(w)z6270~:6100 #lfn(b)z6230V:6100 #rfn(b)z6260t:6100 i=y1+w10  /l(i)zlfy2=i:i=10 :lf=b:6165 #r(i)zrfy2=i:i=10 :rf=b i:y2=z6180$ lf=b6220L:6100 rf=b6250j:6100 $-7420:8:8:z:6025 8Ly$(6):i=w10 :l(i)=n(w)-n(w)*n(b)*i/100d:l(i)w7500L:7010b v)z:z$=:z$=" "7500L:7010b z$13 7030v "p=c(o)+w7500L:7200  !f(p)=bf(p)=37030v  (p1=p1+w:p1=21p1=z:7020l Vw;w;p1+8-10 *(p1>10 ),18+7*(p1>10 );s$(6) sz:z$=:z$=" "w;w;p1+8-10 *(p1>10 ),18+7*(p1>10 );s$(6):7100 z$13 7120   y#1;z,z;" Return to chart Print a copy New chart Main menu "; * z:z$= 4z$="r"menu=z:7270f >kz$="p"#1;z,z;" ";:menu=z:: Hz$="n"menu=w:7270f Rz$="m"menu=b:7270f \ 7210* fY#1;z,z;" ";: 8;8;1;8,18;"Simple";10 ,18;"I Only";12 ,18;"M'thly";14,25;" Years" )ppy=12 :per=w:ptype=z:itype=z: C#1;w,z;" Use SPACE to change this label ";: 4#1;w,12 ;"THINKING";: (#1;w,12 ;" ";: K#1;w,z;"NO SOLUTION, SPACE key to go on."; z:z$=:z$" "7440 9#1;w,z;" ";: L3p=c(o)+ww;w;20,25;s$(6): VMw;w;c$(o,p,b),c$(o,p,34);s$(̰c$(o,p,56)): >z:z$=:z$=13 w;w;w;8,18;" ": z$" "7600 Uitype=z8;8;8;8,18;"Compnd":itype=w:7600 R8;8;8;8,18;"Simple":itype=0:7600 ?z:z$=:z$=13 w;w;w;10 ,18;" ": z$" "7700 (Vptype=z8;8;8;10 ,18;"Pr+Int":ptype=w:7700 2M8;8;8;10 ,18;"I Only":ptype=z:7700 x?z:z$=:z$=13 w;w;w;12 ,18;" ": z$" "7800x _ppy=12 8;8;8;12 ,18;"Qurtly":ppy=4:7800x Xppy=48;8;8;12 ,18;"H/Yrly":ppy=b:7800x Rppy=b8;8;8;12 ,18;"Annual":ppy=w:7800x R8;8;8;12 ,18;"M'thly":ppy=12 :7800x ?z:z$=:z$=13 w;w;w;14,25;" ": z$" "7900 Yper=12 8;8;8;14,25;" Years":per=w:7900 R8;8;8;14,25;"Months":per=12 :7900 @0z:z:5:z::pos=(30-t$(o,b))/b J6w,pos;w;7;" ";t$(o,3b+t$(o,b));" " T>rp=b$(o,w):cp=b$(o,b3):lp=b$(o,45) ^!rp,cp;b$(o,65+lp) hMi=rp+w21:i,z;w;w;7;" ";:i rci=wc(o):rp=c$(o,i,b):cp=c$(o,i,34):lp=c$(o,i,56):9800H&:i |)20,25;" EXIT " Uw:7:w:198,17:513,z:z,-11 :-513,z:z,11 Ui=m(o,w)m(o,b):rp=m$(i,b):cp=m$(i,34):lp=m$(i,56) <8;8;8;rp,cp;m$(i,76+lp) i Ro=7i=9 18:i,18;"   ";:i  &y$=l(i):y$(6)="."y$=" "+y$ $y$i(3)=y$/100d !H'6,7;z;w;7;z;y$ !R7y$(5):val=(i(b)*i(3)/524):y$=val !W(y$(5)=" "y$=" "+y$:8535W! !\46,21;w;7;b;z;y$:9290J$ !pt=w:8800`" !t(p/b-w,w)=y$ !8j$(p,b),j$(p,34);z;w;7;z;y$ ! 9290J$ !pt=w:8800`" "*t(-w+(p-(p<14))/b,b)=y$/100d "8j$(p,b),j$(p,34);z;w;7;z;y$ " 9290J$ "`w$="":y$(j$(p,5)) "j$i=2625+j$(p,5) "t"#1;w,i;"?"; "~ z:z$= "&z$=13 i=40(:8910" "Wz$=12 i>26w$=w$(̱w$-w):#1;w,i;" ";:i=i-w:8820t" "5z$="."(pt=wi=26+j$(p,5))8830~" "z$="."pt=w:8890" "z$<"0"z$>"9"8830~" " w$=w$+z$ "#1;w,i;7;w;z$ "i:i>39'8950" " z:z$= "Dz$=12 i=25+j$(p,5):w$=w$(̱w$-w):8820t" "z$13 8920" ")w$=""w$="."w$="-"y$="0":8980# #+w$=((w$*100d+.5)/100d) # y$=w$ #$y$(y$)=" "y$=" "+y$:8980# #5#1;w,z;" ";: #(fn(n)=(val*100d+.5)/100d:flag=w:y$(c$(o,n,56)):f(n)3f(n)=b #-Ro=wn=bn(b)=1000y$="000":12 ,19;"1";:9050Z# #2 y$=n(n) #<"y$(y$)="."y$=" "+y$(5) #Fy$26w$=w$(̱w$-w):#1;w,i;" ";:i=i-w:9120# #?z$="."(pt=wi=26+c$(o,p,56))9130# #*z$="-"mt=zi=26mt=w:9190# #z$="."pt=w:9190# #z$<"0"z$>"9"9130# # w$=w$+z$ ##1;w,i;7;w;z$ #i:i>39'9245$ $ z:z$= $Nz$=12 i=25+c$(o,p,56):w$=w$(̱w$-w):9120# $z$13 9220$ $(o=wp=39600%:9290J$ $")w$=""w$="."w$="-"y$="0":9280@$ $,+w$=((w$*100d+.5)/100d) $6y$=w$ $;5o=w(p=bưy$n(w))(p=wn(b)zưy$n(b))y$=n(p) $@$y$(y$)=" "y$=" "+y$:9280@$ $J5#1;w,z;" ";: $T;#1;w,z;"Enter required number; "; $^;9100#:o=bp=7(y$>5Űy$z)(p=bf(9 )>z)(p=8n(b)z)(p=9 n(b)z)9300T$ $cNo=3((f(6)=wp=11 )(f(11 )=wp=6))9300T$ $d~o=5((f(5)=wp=3)(f(3)zp=5)(f(4)zp=6)(f(6)zp=4))9300T$ $go=5p=w9300T$ $hn(p)=y$:f(p)=w $r<z;7;z;w;c$(o,p,b),c$(o,p,34);y$ $ $;#1;w,z;"Enter required number; "; $ 9100# $Pp1<11 l(p1)=y$+.001wn:z;7;z;w;p1+8,18;y$: $Lr(p1-10 )=y$+.001wn:z;7;z;w;p1-2,25;y$: %rateflagz %!t(6,b) %&'9560X%:t(6,b):i=w6 %0j=wb:t(i,j):j:i %X146009,.3,2600( ,.1}L,4600,.05|L,7100,.05|L,7100,.05|L,900000[,.05|L %b"i(3):i=w3:i(i):i %l"1690,12220/,.09}8Q %vrateflag=100d: %/y$=w$:y$(4)=" "w$=w$+"0":9600% % %i=wc(o):f(i)=bf(i)=z %i: &H>rp,cp;w;7;z;s$(lp)::k=wlp:" ";:k: &R(i=b6:t(i,b)=t(i,b)+t(i-w,b):i &WTz:5:z:z::i=z8:" ":i &\J:i=10 19:" ":i &f%21,13 ;"RETURN" &p;w,w;"NATIONAL INSURANCE";3,5;"Lower Salary Limit  ";4,5;"Upper Salary Limit  ";6,w;"Rate  % Up to `  /week " &zk11 ,w;"PAYE";13 ,2;"On first `  at  %" &Li=w4:" next `  at  %":i &@18,6;"the remainder at  %" &i=w14:y$(6) &,i<3y$=(i(i)/524):9885& &:i=3y$(5):y$=(i(i)*100d):9885& &py$(6):i=4i=6i=8i=10 i=12 y$=t(i/2-1,1):9885& &3y$(b):y$=(100d*t(-w+(i-(i<14))/b,b)) &$y$(y$)=" "y$=" "+y$:9885& &5w;z;7;j$(i,b),j$(i,34);y$ &i &-y$(5):y$=(i(b)*i(3)/524) &$y$(y$)=" "y$=" "+y$:9889& &%6,21;w;b;7;y$ &p=z:8:8:w &p=p+w:p=16p=w & 9990' &)z:z$=:z$=" "9990':9915& &z$13 9925& &9p=15i=6b-w:t(i,b)=t(i,b)-t(i-w,b):i: &;#1;w,z;"Enter required number; "; &!p=wp=b8400 :9915& &#p=385004!:9915& &Mp=4p=6p=8p=10 p=12 8600!:9915& &8700!:9915& '?w;w;j$(p,b),j$(p,34);s$(̰j$(p,5)): ?   3 3pla aww.ԥ18FRACTION CONVERTER18RATIO & PROPORTION16PRICE CALCULATOR 13SALARY & PAYE 09BROKERAGE 08INTEREST 12DEPRECIATION 16GROWTH & INDICES +   ç102003122003142104171906 081606101606121606141606161606181606202101082506102506122506142506162506182506 061806081806121806141806161806181806201806082506102506142506182506182506 101106141106161106181106101806141806161806181806102506122506142506162506182506201113081806111806141806171806142506172506 061806081806101806121806141806161806181806201806142506 051806201806 061806081806101806121806141806161806181806062506082506102506122506122506 0% H&½70001 61417Proportion Value 42108` % 81218Week Month Year62108` % 40001 30001 41912Index Value U '(56<o0i<110816Fraction ----- 140912Decimal 170610Percentage 172601% 080410First Part 100311Second Part 120410Third Part 140311Fourth Part 160410Fifth Part 180905Whole 200415Number of Parts 060314Purchase Price 081106Markup 101106Margin 120710List Price 140908Discount 160314Net Sale Price 181403VAT 200116Gross Sale Price 18290215 100109Gross Pay 120109Allowance 140703Tax 160109Nat. Ins. 180307Net Pay 201113CHANGE RATES 080017Transaction Value110908Base Fee 140314Percentage Fee 170215Total Brokerage 060116Annual Int. Rate 062501% 080116Type of Interest 100017Type of Repayment120116Payment Interval 140611Loan Period 160809Principal 180710Repayments 200215Total Int. Paid 050313Initial Value 071813Linear RedBal 080115Value at end of 091006Year 1 1015012 1115013 1215014 1315015 1415016 1515017 1615018 1715019 18140210 200412% Depn. Rate 060215Reference Point 080314Initial Figure 100512Final Figure 121106Change 141610= % 160017Number of Periods180017Change per Period S d~cSήu^ozaadPaa0aBgrt,)e;@oXlatiH rosaN9lloaC-n"8Rpetyptypexign'n(*n(ematefladmiöhenU03256042560607513136132521413614252151361525216136162521713617252182522113621136zoun Ho?em S* AGooVo򌣮IenwbA9( }L|L|L|LД[|LЉ/}8Q녌5 Hnh 9XU2*BB[,/ z[=L{O|5 Hnh :f-Z^ً!7sG p TJq3L`PzP"0 t#wnz# =z# =0 W.01  0Zk