How To Determine Whether a Number is PrimeLast reviewed: July 31, 1996Article ID: Q153200 |
The information in this article applies to:
SUMMARYThere is no single function in FoxPro or Visual FoxPro that determines whether a number is prime. This article describes how to use a program that allows you to enter a positive number and then reports if that number is prime.
MORE INFORMATIONA prime number is a number divisible only by one and itself. The following program uses the MOD()and ABS() functions along with a For...Next loop to check if a number is prime:
CLEAR
SET TALK OFF
x=0
@ 1,10 SAY "Please enter a positive integer" GET x
READ
x=ABS(x)
FOR i=2 to x-1
IF MOD(x,i)=0
@2,10 SAY "The number "+ ALLTRIM(STR(x))+ " is not prime."
RETURN
ENDIF
ENDFOR
@ 2,10 SAY "The number "+ ALLTRIM(STR(x))+ " is prime."
SET TALK ON
While this program uses the READ statement for backward compatibility with
FoxPro 2.x versions, the basic algorithm may be used in a form within
Visual FoxPro.
|
Additional reference words: 2.50 2.60 3.00 3.00b VFoxWin VFoxMac
© 1998 Microsoft Corporation. All rights reserved. Terms of Use. |