AMSTRAD sinclair ZX Spectrum +3 Manual Del Usario página 78

Tabla de contenido
Sección 4
Bucles
Temas tratados:
FOR, NEXT
TO, STEP
Supongamos que deseamos escribir un programa que capte cinco números por el teclado
y
los sume.
Un método podría ser el siguiente (no copie esto, a menos que quiera hacer prácticas de
mecanografía) :
10
LET
total=O
20 INPUT
a
30
LET
total=total+a
40 INPUT a
50 LET
total=total+a
60 INPUT
a
70
LET
total=total+a
80 INPUT
a
90 LET total=total+a
100
INPUT a
110
LET
total=total+a
120
PRINT
total
Este método es pésimo. El programa resulta más o menos manejable cuando se trata de
sumar cinco números, pero imagínese que hubiera que sumar diez (o cien).
Lo que vamos a hacer es usar una variable para contar hasta 5
y
luego detener el programa
(éste sí debe copiarlo):
10
LET
total=O
20
LET
contador=1
30
INPUT
a
40 REM contador indica el número de veces que
se ha captado el valor de a hasta ahora
50 LET
total=total+a
60 LET
contador=contador+1
70
IF
contador<=5
THEN GO TO
30
80
PRINT
total
Capítulo 8. Guía de programación en +3 BASIC
68
Tabla de contenido
loading

Tabla de contenido