University of Illinois, Urbana-Champaign

**Topic: Prime program
**** implemented in QuickBasic**

**February 4,
2016**

`
INPUT number
prime$ = "True"
divisor = 2
WHILE divisor < number
intermediate = number
WHILE intermediate >= divisor
intermediate = intermediate - divisor
WEND
remainder = intermediate
IF remainder = 0 THEN
prime$ = "False"
END IF
divisor = divisor + 1
WEND
PRINT print$
`

University of Illinois, Urbana-Champaign