Positive decimal integers with the digit 1 occurring exactly twice: Difference between revisions
Content added Content deleted
(Realize in Minizinc) |
(Add Factor) |
||
| Line 76: | Line 76: | ||
11 101 110 211 121 112 311 131 113 411 141 114 511 151 115 611 161 116 711 171 117 811 181 118 911 191 119</pre> |
11 101 110 211 121 112 311 131 113 411 141 114 511 151 115 611 161 116 711 171 117 811 181 118 911 191 119</pre> |
||
</pre> |
</pre> |
||
=={{header|Factor}}== |
|||
{{trans|F#}} |
|||
{{works with|Factor|0.99 2021-06-02}} |
|||
<lang factor>USING: io math math.functions prettyprint sequences |
|||
sequences.extras ; |
|||
{ 0 2 3 4 5 6 7 8 9 } |
|||
[| n | { { n 1 1 } { 1 n 1 } { 1 1 n } } ] map-concat |
|||
[ <reversed> 0 [ 10^ * + ] reduce-index pprint bl ] each nl</lang> |
|||
{{out}} |
|||
<pre> |
|||
11 101 110 211 121 112 311 131 113 411 141 114 511 151 115 611 161 116 711 171 117 811 181 118 911 191 119 |
|||
</pre> |
|||
=={{header|Go}}== |
=={{header|Go}}== |
||
{{trans|Wren}} |
{{trans|Wren}} |
||