Operation Manual

Blz. 21-67
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 4 @@@S3@@ Resultaat: S:30
5 @@@S3@@ Resultaat: S:55 8 @@@S3@@ Resultaat: S:204
10 @@@S3@@ Resultaat: S:385 20 @@@S3@@ Resultaat: S:2870
30 @@@S3@@ Resultaat: S:9455 100 @@@S3@@ Resultaat: S:338350
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 « xs DO
‘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 ` Voert de parameters 1 1.5 0.5 in
[ ‘ ] @GLIS3 ` Voert de programmanaam in op
niveau 1
„°LL @)@RUN@ @@DBG@ Activeer de debugger.
Gebruik @SST↓@ om stapsgewijs door het programma te lopen en de
gedetailleerde werking van elk commando te zien.
∑
=
=
n
k
kS
0
2