Sequence of non-squares: Difference between revisions
Content added Content deleted
(New post without using external libraries. In addition to an existing post which uses the "Boost" library.) |
(Easylang) |
||
Line 776: | Line 776: | ||
{{out}} |
{{out}} |
||
<pre>2 3 5 6 7 8 10 11 12 13 14 15 17 18 19 20 21 22 23 24 26 27</pre> |
<pre>2 3 5 6 7 8 10 11 12 13 14 15 17 18 19 20 21 22 23 24 26 27</pre> |
||
=={{header|EasyLang}}== |
|||
<syntaxhighlight lang="easylang"> |
|||
func nonSqu n . |
|||
return n + floor (0.5 + sqrt n) |
|||
. |
|||
for i = 1 to 22 |
|||
print nonSqu i |
|||
. |
|||
for i = 1 to 1e6 |
|||
j = sqrt nonSqu i |
|||
if j = floor j |
|||
found = 1 |
|||
. |
|||
. |
|||
if found = 0 |
|||
print "No squares found" |
|||
. |
|||
</syntaxhighlight> |
|||
=={{header|EchoLisp}}== |
=={{header|EchoLisp}}== |