Smallest square that begins with n: Difference between revisions

Content added Content deleted
m (→‎{{header|Wren}}: Minor tidy)
Line 2,916: Line 2,916:


=={{header|Wren}}==
=={{header|Wren}}==
{{libheader|Wren-seq}}
{{libheader|Wren-fmt}}
{{libheader|Wren-fmt}}
<syntaxhighlight lang="ecmascript">import "/seq" for Lst
<syntaxhighlight lang="wren">import "./fmt" for Fmt
import "/fmt" for Fmt


var isSquare = Fn.new { |n|
var isSquare = Fn.new { |n|
Line 2,950: Line 2,948:
}
}
System.print("Smallest squares that begin with 'n' in [1, 49]:")
System.print("Smallest squares that begin with 'n' in [1, 49]:")
for (chunk in Lst.chunks(squares, 10)) Fmt.print("$5d", chunk)</syntaxhighlight>
Fmt.tprint("$5d", squares, 10)</syntaxhighlight>


{{out}}
{{out}}
Retrieved from "https://rosettacode.org/wiki/Smallest_square_that_begins_with_n"