IBM 5110 User Manual page 16

As you break an application down into more manageable parts, you
might want to have a separate user-defined function for each part. For
example:
V I~~"INTEI~EST .
[:L::I
I~~"INPUT
[2J
R~PROCESS
R
[~3]
Rt'[}UTPUT
I~
V
V
X~"INPUT
1:::1. J
[2]
START: 'ENTER THE INTEREST RATE, YEARS, AND PRINCIPAL'
I::
~'5 J
[1+]
I::
~:.:j
J
[6J
['{]
[BJ
[9]
[:LOJ
'\I
X~
.. []
~«X[lJ)18)/(X[2J)40)/(X[3])500000»/E1/E2/E3
..
~O
E1: 'THE INTEREST RATE IS GREATER THAN 18 PERCENT'
"~START
E2: 'THE NUMBER OF YEARS IS GREATER THAN
~O'
"~STAI~T
E~5: •
THE
PI~INCIPAL IS GI~EATEI~
THAN
~5()OOOO,
00'
"~STAI~T
V
CI~PROCESS
INPUT;A;B
[lJ
A~1+0,()1~INPUT[:LJ
[2J
B~A*INPUT[2J
[3J
CI~INPUT[3]xB
V
V
R~"DUTPUT
CI
£::1.:1
I~~'"
THE
INTEI~ESr
EARNED IS: '
:I. ()
2
Tel
'iJ
Information Processing 11