Jump to content

Magic constant: Difference between revisions

Added Quackery
(Added Quackery)
(Added Quackery)
Line 490:
=={{header|Quackery}}==
 
<lang Quackery> [ 3 + dup 2dup3 * * + 2 / ] is magicconstant ( n --> n )
20 times [ i^ magicconstant echo sp ] cr cr
 
1000 magicconstant echo cr cr
 
0 1
[ over magicconstant over > if
[ over 3 + echo cr
10 * ]
dip 1+ dup
[ 10 21 ** ] constant
over = until ]
2drop</lang>
 
1,462

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.