Anonymous user
Find the missing permutation: Difference between revisions
m
→{{header|Octave}}
(octave added) |
|||
Line 903:
'DCBA';'BACD';'BADC';'BDAC'; ...
'CBDA';'DBCA';'DCAB' ];
val = 4.^(3:-1:0)';
there = 1+(toascii(given)-toascii('A'))*
every = 1+perms(0:3)*
bits = zeros(max(every),1);
bits(every) = 1;
bits(there) = 0;
missing = dec2base(find(bits)-1,'ABCD')
</lang>
=={{header|Oz}}==
| |||