Jacobi symbol: Difference between revisions

Content added Content deleted
(Added PL/M)
m (→‎{{header|Wren}}: Minor tidy)
Line 2,065: Line 2,065:
{{trans|Python}}
{{trans|Python}}
{{libheader|Wren-fmt}}
{{libheader|Wren-fmt}}
<syntaxhighlight lang="ecmascript">import "/fmt" for Fmt
<syntaxhighlight lang="wren">import "./fmt" for Fmt


var jacobi = Fn.new { |a, n|
var jacobi = Fn.new { |a, n|
Line 2,093: Line 2,093:
var n = 1
var n = 1
while (n < 31) {
while (n < 31) {
System.write(Fmt.d(3, n))
Fmt.write("$3d", n)
for (a in 1..15) System.write(Fmt.d(4, jacobi.call(a, n)))
for (a in 1..15) Fmt.write("$4d", jacobi.call(a, n))
System.print()
System.print()
n = n + 2
n = n + 2