ASP asal sayı yardım

arkadaşlar şu keilde bir asal sayı saydırmayı nasıl yaparım


2

3

5

7

11

13


gibi textbox felan olmuyacak for ile olcak bir türlü yapamadım :S

10 ile 100 arası;

<%
for i = 10 to 100
if not i mod 2 = 0 and not i mod 3 = 0 and not i mod 4 = 0 and not i mod 5 = 0 and not i mod 6 = 0 and not i mod 7 = 0 and not i mod 8 = 0 and not i mod 9 = 0 then
Response.Write i&"<br />"
end if
next
%>

çok teşekkürler

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
%>