Substring primes: Difference between revisions

Content added Content deleted
(Substring primes in various BASIC dialents)
mNo edit summary
Line 270: Line 270:


for i = 1 to 500
for i = 1 to 500
if isSubstringPrime(i) = 1 then print i; " ";
if isSubstringPrime(i) then print i; " ";
next i
next i
end</lang>
end</lang>
Line 313: Line 313:
OpenConsole()
OpenConsole()
For i.i = 1 To 500
For i.i = 1 To 500
If isSubstringPrime(i) = 1 : Print(Str(i) + " ") : EndIf
If isSubstringPrime(i) : Print(Str(i) + " ") : EndIf
Next i
Next i
Input()
Input()
Line 347: Line 347:


for i = 1 to 500
for i = 1 to 500
if isSubstringPrime(i) = 1 then print i, " "; : fi
if isSubstringPrime(i) then print i, " "; : fi
next i
next i
end</lang>
end</lang>