Sharp PC-1500 Anwenderhandbuch Seite 94

PROGRAMMN-NR. . 3
P5—D-1
[ Speicherinhalt ]:
[a | Ratnhihe
{ Programmlisting |
'@:"A"CLEAR =LF 2
26: INPUT "RATENAN
Zo PF N54
25: LPRINT ""RATENA |
NZ. =", USING "
HHH. HEN SA
36: GOSUB 488
35: J=€14+07108)00
4@:D=INT ¢(¢J-1)*B
Zinsen (%)
50:
55%
218:
"CI#C7188))
LPRINT ""HOECHS
TGRENZES="
LPRINT USING "
HHHHHHHHHAHH, #
##° 5D Ausfihrung der
caste SPEND : |
7@B: "B'CLEAR :LF ? K Ausfithrung der
INPUT "HOECHST perechoung .
7 a
Bes ed
ae ee lo |
Ei
a
GRENZE? "3D
215:LPRINT "HOECHS
TGRENZE=":
LPRINT USING "
HHHHARHHE, HHH"
22@:GOSUB 482
238: K=B/ (B-DxXC7 100
)
248:A=LOG K"LOG (C1
+C/ 108)
25@:LPRINT "RATENA
N2Z.=",USING "#
HE. HHO SO
26@:LF 3:END
408: INPUT "RATENHO
EHE?";B
405:LPRINT ""RATENH
QEHE="= LPRINT
USING "HRHHHHH
HHHHH, HEE SB
410: INPUT *"ZINSENC
2. 3G
415:LPRINT ""ZINSEN
(Z%)=", USING "#
HHH. HEU SC
438; RETURN
> END
STATUS. 1