Sum of squares: Difference between revisions
→{{header|Euler}}: Sybntax highlight with Mediawiki markup
imported>GoulashAmateur (Add functional Common Lisp version) |
(→{{header|Euler}}: Sybntax highlight with Mediawiki markup) |
||
Line 1,165:
=={{header|Euler}}==
Using [[Jensen's Device]]
'''begin'''▼
'''new''' i; '''new''' A; '''new''' sum;▼
▲begin
sum <- ` '''formal''' i; '''formal''' lo; '''formal''' hi; '''formal''' term;
▲ new i; new A; new sum;
loop:
A <- ( 1, 2, 3, 4, 5 );
'''end''' $▼
▲end $
=={{header|Euphoria}}==
|