Forbidden numbers: Difference between revisions
Content added Content deleted
(Added Algol 68) |
(→{{header|ALGOL 68}}: comment) |
||
| Line 37: | Line 37: | ||
<syntaxhighlight lang="algol68"> |
<syntaxhighlight lang="algol68"> |
||
BEGIN # find some forbidden numbers: numbers that cannot be formed by # |
BEGIN # find some forbidden numbers: numbers that cannot be formed by # |
||
# fewer than four squares |
# summing fewer than four squares # |
||
# returns TRUE if n is a Forbidden numbr, FALSE otherwise # |
# returns TRUE if n is a Forbidden numbr, FALSE otherwise # |
||
# based on the Wren version of the example at oeis.org/A004215 # |
# based on the Wren version of the example at oeis.org/A004215 # |
||