Loops/Increment loop index within loop body: Difference between revisions
Content added Content deleted
No edit summary |
(Loops/Increment loop index within loop body in Yabasic) |
||
Line 4,887: | Line 4,887: | ||
42: 99,504,028,301,131 |
42: 99,504,028,301,131 |
||
</pre> |
</pre> |
||
=={{header|Yabasic}}== |
|||
<lang yabasic>i = 42 |
|||
counter = 0 |
|||
while counter < 42 |
|||
if isPrime(i) then |
|||
counter = counter + 1 |
|||
print "n = ", counter, chr$(9), i |
|||
i = i + i - 1 |
|||
end if |
|||
i = i + 1 |
|||
wend |
|||
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> |
|||
=={{header|zkl}}== |
=={{header|zkl}}== |