Primality by trial division: Difference between revisions

Added BASIC example.
(Added BASIC example.)
Line 23:
return Result;
end Is_Prime;
 
=={{header|BASIC}}==
'''Compiler:''' [[QuickBasic]] 4.5
 
Going with the classic 1 for "true" and 0 for "false":
FUNCTION prime% (n!)
IF n = 2 THEN prime = 1
IF n <= 1 OR n MOD 2 = 0 THEN prime = 0
FOR a = 3 TO INT(SQR(n)) STEP 2
IF n MOD a = 0 THEN prime = 0
NEXT a
prime = 1
END FUNCTION
 
=={{header|Ruby}}==
Anonymous user