Determine if a string has all the same characters: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: whitespace regularize) |
m (→{{header|REXX}}: added zkl header) |
||
Line 309: | Line 309: | ||
not all the same character for string (length 6): tttTTT [character T ('54'x) at position 4]. |
not all the same character for string (length 6): tttTTT [character T ('54'x) at position 4]. |
||
not all the same character for string (length 9): 4444 444K [character ('20'x) at position 5]. |
not all the same character for string (length 9): 4444 444K [character ('20'x) at position 5]. |
||
</pre> |
|||
=={{header|zkl}}== |
|||
<lang zkl></lang> |
|||
<lang zkl></lang> |
|||
{{out}} |
|||
<pre> |
|||
</pre> |
</pre> |