Advertenties
Example 2 – bereken de som S met een DO...UNTIL...END-constructie
Het volgende programma berekent de som
met een DO...UNTIL...END-lus:
0. → n S
DO n SQ S + 'S' STO n 1 – 'n' STO UNTIL
«
«
'n<0' END S "S" TAG » »
Sla dit programma op in de variabele @@S3@@. Controleer de volgende
oefeningen: J
3 @@@S3@@
Resultaat: S:14
5 @@@S3@@
Resultaat: S:55
10 @@@S3@@
Resultaat: S:385
30 @@@S3@@
Resultaat: S:9455
Voorbeeld 3 – Maak een lijst aan met een DO...UNTIL...END-constructie
Tik het volgende programma in
→ xs xe dx
xe xs – dx / ABS 1. + xs → n x
«
«
'x+dx' EVAL DUP 'x' STO UNTIL 'x≥xe' END n →LIST » » »
en sla het op in variabele @GLIS3.
•
Zorg ervoor dat de programmaroep 0.5 ` 2.5 ` 0.5 ` @GLIS3 de
lijst {0.5 1. 1.5 2. 2.5} geeft.
•
Gebruik het programma DBUG voor een korte lijst om de werking stap
voor stap te zien, bijvoorbeeld:
J1 # 1.5 # 0.5 `
[ ' ] @GLIS3 `
„°LL @) @ RUN@ @@DBG@
n
∑
2
S
=
k
k
=
0
4 @@@S3@@ Resultaat: S:30
8 @@@S3@@ Resultaat: S:204
20 @@@S3@@ Resultaat: S:2870
100 @@@S3@@ Resultaat: S:338350
Voert de parameters 1 1.5 0.5 in
Voert de programmanaam in op
niveau 1
Activeer de debugger.
«
xs DO
Blz. 21-67
Advertenties
