HP Prime Graphing NW280AAABA Export Maxfactorsn Begin, MSGBOXMax of + max + factors for +result

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(CAS.idivis(k)) ▶ cur; IF cur(1) > max THEN

cur(1) ▶ max; k ▶ result; END;

END;

MSGBOX("Max of "+ max +" factors for "+result);

END;

In Home, enter

MAXFACTORS(100).

FOR STEP Syntax: FOR var FROM start TO finish [STEP increment] DO commands END;

Sets variable var to start, and for as long as this variable is less than or equal to finish, executes the sequence of commands, and then adds increment to var.

Example 2: This program draws an interesting pattern on the screen.

EXPORT DRAWPATTERN() BEGIN

LOCAL xincr,yincr,co lor; STARTAPP("Function");

530 Programming in HP PPL