Texas Instruments TI-89 Titanium Manual De Uso página 697

Ejemplo 3 Ejemplo 3 Ejemplo 3 Ejemplo 3
En este ejemplo se emplea
entrada y la salida.
:prog3()
:Prgm
Ê
:Dialog
©
: Title "Enter an integer"
©
: Request "Integer",n
Ê
:EndDlog
Ë
:expr(n)!n
:0!temp:0!I
Ì
:Loop
©
: temp+i!temp
©
: i+1!I
©
: If i>n
©
: Exit
Ì
:EndLoop
Í
:Dialog
©
: Title "The answer is"
©
: Text string(temp)
Í
:EndDlog
ê
:EndPrgm
Ê
Define un cuadro de diálogo para la entrada.
Ë
Convierte la cadena introducida con Request en una expresión.
Ì
Calcula el bucle.
Í
Define un cuadro de diálogo para la salida.
Programación
Dialog...EndDlog
se emplea en el cálculo del resultado.
Loop...EndLoop
para crear cuadros de diálogo para la
695