Jump to content

Positive decimal integers with the digit 1 occurring exactly twice: Difference between revisions

J
(→‎Pascal: replace complicated solution with straightforward implementation working with any dialect of Pascal)
(J)
Line 250:
Found 27 such numbers.
</pre>
 
=={{header|J}}==
Generating the numbers as the cartesian product of the eligible digits (and sorting the result, for "prettiness"):
<lang J> /:~10 #. >,{~.(2 1#1;i.10){~(! A.&i. ])3
11 101 110 111 111 111 112 113 114 115 116 117 118 119 121 131 141 151 161 171 181 191 211 311 411 511 611 711 811 911</lang>
 
=={{header|jq}}==
Line 306 ⟶ 311:
911
</pre>
 
 
=={{header|Julia}}==
6,951

edits

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