Texas Instruments TITANIUM TI-89 - Manual (Page 639)

Programming 639
Example 3 Example 3 Example 3 Example 3
This example uses Dialog...EndDlog to create dialog boxes for input and output. It uses
Loop...EndLoop to calculate the result.
Ê
Defines a dialog box for input.
Ë
Converts string entered with Request to an expression.
Ì
Loop calculation.
Í
Defines a dialog box for output.
К
©
©
К
Л
М
©
©
©
©
М
Н
©
©
Н
к
: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