RosettaCodeData/Task/Rep-string/Mathematica/rep-string-2.math

3 lines
145 B
Plaintext

str={"1001110011","1110111011","0010010010","1010101010","1111111111","0100101101","0100100","101","11","00","1"};
{#,RepStringQ[#]}&/@str//Grid