Sharp PC-1500 Anwenderhandbuch Seite 70

[ Programmlisting ]
19: "A": CLEAR :CLS
'WAIT @
20: INPUT "a="5A:
INPUT "n="3N
70: E=0:L=9
73: BS=STR$ Ci+1)+
", "4+STR$ CL4+1)
262 AS="xXC"+BS4+" =
7/?:>PRINT A$;
84: INPUT D:CLS
90: E=E+D: 2=Z+DxD
108: IF L<oN-ILET L
=L+1:GOTO 275
21@: S=S+EXE
220: R=Rt+E
2340: 1F I<>A-1LET 1
#I+1:GO0TO 72
248: R=R¥R7 CAXND
250: S=S/N
434: S=S-R:LPRINT "
— Hoe
"3PZLPRINT
2-f
Z-SeLPRINT. *
cai
t
A
I38:F
548: S=S/F
698: O=AX(N-1):
LPRINT ""DFe=";
Q
788: P=P/0
718: O=AXN- 1: LPRINT
"DFt="30
72@:LPRINT "UVa="3S
8@0:LPRINT "Ue="3P
81Q:F=S/P:LPRINT "
Fa="5F
898: END
STATUS 1
PROGRAMN-NR.
P5—B-—9
[ Speicherinhalt ]
a (Anzahl der Faktoren)
* ingabe
=
a
ana
Rind
3 Pt)
ae)
fala
Anzahl der Wieder-
holungen
ge, ot
e, Ve
oo"
2X i)? /Can)
. (3x ij)" /n, Sa, Va
Bae
ie
<
&
eal
"a St
Eingabemeldung
Eingabemeldung