Substring primes: Difference between revisions

m
no edit summary
(Substring primes in various BASIC dialents)
mNo edit summary
Line 270:
 
for i = 1 to 500
if isSubstringPrime(i) = 1 then print i; " ";
next i
end</lang>
Line 313:
OpenConsole()
For i.i = 1 To 500
If isSubstringPrime(i) = 1 : Print(Str(i) + " ") : EndIf
Next i
Input()
Line 347:
 
for i = 1 to 500
if isSubstringPrime(i) = 1 then print i, " "; : fi
next i
end</lang>
2,130

edits