24
\$\begingroup\$

Apparently, we really like printing the alphabet in different languages.

How about the Russian Cyrillic alphabet?

Print/output/return this exact text (trailing whitespace is permitted)

АаБбВвГгДдЕеЁёЖжЗзИиЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЪъЫыЬьЭэЮюЯя

This is the Russian Cyrillic alphabet with upper and lower case interleaved (eg AaBbCc...)

This is so crunch those bytes folks!

\$\endgroup\$
9
  • 9
    \$\begingroup\$ @EriktheOutgolfer This Unicode order of these make for a very different challenge. \$\endgroup\$
    – Adám
    Jun 21, 2017 at 10:31
  • \$\begingroup\$ Is outputting an array of individual characters permitted? \$\endgroup\$
    – Shaggy
    Jun 21, 2017 at 11:16
  • \$\begingroup\$ For Ёё, may we output codepoints U+00CB and U+00EB instead of U+0401 and U+0451? \$\endgroup\$ Jun 21, 2017 at 17:04
  • 1
    \$\begingroup\$ @ETHproductions no, the text must be outputted exactly \$\endgroup\$
    – Mayube
    Jun 21, 2017 at 17:14
  • 3
    \$\begingroup\$ Do we have to use Unicode? Or can we use an 8-bit Cyrillic encoding? \$\endgroup\$
    – KSmarts
    Jun 22, 2017 at 13:43

33 Answers 33

1
2
0
\$\begingroup\$

AWK, 79 bytes

BEGIN{for(x=1039;++i<33;){f="%c%c";f=i==6?f f:f;printf f,i+x,i+32+x,1025,1105}}

Try it online!

This works on TIO, not sure if it's dependent on installed char-set.

\$\endgroup\$
0
\$\begingroup\$

Haskell, 80 bytes

import Data.Char;f=putStr$(\x->[x,toLower x])=<<['А'..'Е']++'Ё':['Ж'..'Я']
\$\endgroup\$
1
  • 1
    \$\begingroup\$ Welcome to the site! :) \$\endgroup\$
    – DJMcMayhem
    Jun 22, 2017 at 21:49
0
\$\begingroup\$

Perl, 37 bytes

print map{chr.chr($_+32)}(1040..1071)

It's annoying that Perl's character autoincrement only works for the Latin alphabet. I could save so many characters if it worked outside that range.

\$\endgroup\$
1
2

Not the answer you're looking for? Browse other questions tagged or ask your own question.