HP 39gII

268 Programming
causes the name of the selected person will be printed to
the terminal.
Loop commands
FOR…FROM…TO…
DO…END Syntax: FOR var FROM start TO finish [STEP increment] DO
commands
END;
Sets variable var to start, and for as long as this variable's
value is less than or equal to finish, executes the sequence
of commands, and then adds 1 (increment) to var.
Example 1: This program determines which integer from
2 to N has the greatest number of factors.
EXPORT MAXFACTORS(N)
BEGIN
LOCAL cur, max,k,result;
1
 max;1 result;
FOR k FROM 2 TO N DO
SIZE(idivis(k))
 cur;
IF cur > max THEN
cur  max;
k
 result;
END;
END;
MSGBOX("Max of "+ max +" factors for
"+result);
In Home, enter
MAXFACTORS(100).
Example 2: This program draws an interesting pattern on
the screen.