Primality by trial division: Difference between revisions

=={{header|Yabasic}}==

{{trans|FreeBASIC}}

<lang yabasic>for i = 1 to 99

if isPrime(i) print str$(i), " ";

next i

print

end

sub isPrime(v)

if v < 2 return False

if mod(v, 2) = 0 return v = 2

if mod(v, 3) = 0 return v = 3

d = 5

while d * d <= v

if mod(v, d) = 0 then return False else d = d + 2 : fi

wend

return True

end sub</lang>