Qui sotto trovi un programma da completare  (scritto in Basic)  che dovrebbe avere esiti simili a quelli rappresentati qui a destra.  Cosa devi mettere al posto di "BOH"? Tieni cono che R deve essere il resto della divisione intera tra N e D. Poi trova i divisori di 1234567.

10 INPUT "introduci un numero < 5 milioni per non aspettare troppo "; N : D = 0
20 D = D+1 : IF D > N THEN GOTO 100
30 R = N/D - BOH(N/D) : IF R=0 THEN PRINT D+" ";
40 GOTO 20
100 PRINT "questi sono i divisori di ", N : GOTO 10