HP NW280AAABA Manual do Utilizador Página 536

  • Descarregar
  • Adicionar aos meus manuais
  • Imprimir
Vista de página 535
530 Programming in HP PPL
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");
Vista de página 535
1 2 ... 531 532 533 534 535 536 537 538 539 540 541 ... 615 616

Comentários a estes Manuais

Sem comentários