Merhaba,
Aşağıdaki koddaki 100 rakamını değiştirerek istediğiniz sayıya kadar prime bulabilirsiniz.
Mantık olarak şöyle her sayı için, o sayının yarısından küçük diğer sayılara bölünüp, bölünmediğini kontrol ediyor.
<%
for num = 2 to 100
isprime = true
factor = 0
for i=2 to num/2
if num mod i = 0 then
isprime = false
factor = i
end if
next
if(isprime = true) then
Response.Write num&"<br />"
end if
next
%>