Sum of squares: Difference between revisions

Added Quackery.
No edit summary
(Added Quackery.)
Line 2,082:
=={{header|Q}}==
<lang q>ssq:{sum x*x}</lang>
 
=={{header|Quackery}}==
 
<lang Quackery> [ 0 swap witheach [ 2 ** + ] ] is sumofsquares ( [ --> n )</lang>
 
{{out}}
 
Testing in the Quackery shell.
 
<pre>> quackery
 
Welcome to Quackery.
 
Enter "leave" to leave the shell.
 
/O> [ 0 swap witheach [ 2 ** + ] ] is sumofsquares
... ' [ 2 3 5 7 11 13 17 ] sumofsquares echo cr
... ' [ ] sumofsquares echo cr
... leave
...
666
0
 
Sayonara.</pre>
 
=={{header|R}}==
1,462

edits