У цієї проблеми, ви будете «заднім ходом» алфавіту або заміни a-zз z-a. Це в народі відомий як цифер Атбаш .

Оскільки ця трансформація робить висновок схожим на якусь іноземну мову, ваш код повинен бути якомога коротшим.

Приклади

abcdefghijklmnopqrstuvwxyz
zyxwvutsrqponmlkjihgfedcba

Programming Puzzles & Code Golf
Kiltiznnrmt Kfaaovh & Xlwv Tlou

Hello, World!
Svool, Dliow!

Специфікація

• Вхід може містити кілька рядків і буде лише ASCII
• До виводу не слід додавати додаткові пробіли
• Справа повинна бути збережена

Таблиця лідерів

var QUESTION_ID=68504,OVERRIDE_USER=40695;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Це код-гольф, тому найкоротший код в байтах виграє

Pyth, 8 байт

XXzG)rG1

@xnor запропонував такий простіший підхід у відповіді на Pyth @ FryAmTheEggman, тоді я переклав його на Pyth.

При цьому використовується зручна поведінка X(перекладати), коли дано лише два аргументи: він переводить з другого аргументу в зворотний другий аргумент. Ми робимо це спочатку з малої букви ( G), а потім з верхнього регістру G.

C, 59 байт

Вибачте за які виховують C знову, але я був трохи розчарований , щоб бачити тільки C функції тут. Я був під враженням, що ОП шукав корисний продукт.

main(c){while(~(c=getchar()))putchar(isalpha(c)?c+4^31:c);}

Складено на Ubuntu 14.04 з простим:

cc swalpha.c

Отриманий виконуваний файл зчитує будь-яку кількість рядків зі stdin та записує результат у stdout.

Завдяки такій кількості інших плакатів за трюк XOR.

CJam, 17 байт

Я хотів допомогти GamrCorps гольфу його CJam рішення, але результат виявився настільки різним, що я вирішив зробити окрему відповідь.

q'[,_el^_W%32f^er

Спробуйте в Інтернеті.

Пояснення

q     e# Read all input.
'[,   e# Get a character range from the null byte up to and including "Z".
_el   e# Duplicate and convert to lowercase.
^     e# Symmetric set difference. Due to the lowercase operation only letters will not
      e# appear in both sets, and so we get a string with all uppercase letters followed
      e# by all lowercase letters, i.e "ABC...XYZabc...xyz".
_W%   e# Duplicate and reverse. Gives: "zyx...cbaZYX...CBA".
32f^  e# Take each character XOR 32 which swaps the case, so now we have:
      e#                               "ZYX...CBAzyx...cba"
er    e# Transliterate: substitute each character in the first string with the correspoding
      e# character in the second string.

JavaScript (ES6), 69 67 байт

x=>x.replace(/[A-Z]/gi,c=>String.fromCharCode(c.charCodeAt()+4^31))

Використовується та ж стратегія, що і моя відповідь Japt :

x=>x.replace(/[A-Z]/gi,C=>   // Replace each letter C with
 String.fromCharCode(        //  the character with char code
  C.charCodeAt()+4^31))      //   the char code of C, plus 4, with the last 5 bits flipped.

Проклинайте свої неймовірно довгі імена, JS ...

Сітківка , 17 14 13 байт

Код:

\T`w`_dZ-Az-a

Пояснення:

\             # This suppresses the trailing linefeed
 T            # Switches to transliterate mode
  `w          # w is short for _0-9A-Za-z
    `_d       # d is short for 0-9
       Z-Az-a # Z-Az-a

Це робить деякі магічні речі і виконує завдання.

Спробуйте тут .

Піта, 10 9

uXGr;H)2z

Дякую Якубе за збереження байта за допомогою нової функції ;!

Тестовий сюїт

Швидке пояснення: зменшити, починаючи з введення цифр 0 і 1. Операція, яку слід виконати, переводить алфавіт нижнього регістру з будь-якої r...0або r...1які є нижньою та верхньою функціями з python, відповідно, застосованої до неї, а потім перевернутою.

Юлія, 74 61 47 байт

s->replace(s,r"[a-z]"i,t->Char(31$Int(t[1])-4))

Це лямбда-функція, яка приймає рядок і повертає рядок. Щоб викликати його, призначте його змінній.

Кожну букву ми узгоджуємо за допомогою регулярного виразу і замінюємо кожну букву символом ASCII, що відповідає 31 XOR коду ASCII для літери мінус 4.

C, 150 129 байт

void rev(char*s){int i,t;for(i=0;i<strlen(s);i++){t=s[i]+25;t=t<116?180-t:244-t;isalpha(s[i])?printf("%c",t):printf("%c",s[i]);}}

Ця функція просто перетворює char в int і додає відповідний зсув до int перед друком. Я знаю, що це не найкоротше, але я не бачив реалізації C.

Приклад використання

#include<stdio.h>
#include<string.h>
#include<ctype.h>

void rev(char*s){int i,temp;for(i=0;i<strlen(s);i++){temp=s[i]+25;temp=temp<116?180-temp:244-temp;isalpha(s[i])?printf("%c",temp):printf("%c",s[i]);}}


int main(){
   char *s = "hello, there";
   rev(s);
   return 0;
}

ОНОВЛЕННЯ: скорочена назва змінної.

Japt, 23 22 байт

Ur"[A-Za-z]"_c +4^31 d

Спробуйте в Інтернеті!

Як це працює

Ur"[A-Za-z]"_  // Take the input and replace each letter with:
 c +4          //  Take its char code and add 4. This results in
               //  the string      "ABC...XYZabc...xyz"
               //  becoming        "EFG...\]^efg...|}~".
 ^31           //  XOR the result by 31. This flips its last five 5 bits.
               //  We now have     "ZYX...CBAzyx...cba".
 d             //  Convert back from a char code.
               // Implicit: output last expression

С, 64

Недійсна функція, яка змінює рядок на місці.

t(char*p){for(int c;c=*p;)*p++=c>64&c<91|c>96&c<123?(c^31)-4:c;}

Тест: ideone

R, 69 61 байт

Дякуємо @Giuseppe за бриття додаткових байтів:

function(s)cat(chartr("a-zA-Z",intToUtf8(c(122:97,90:65)),s))

Попередня версія:

function(s)cat(chartr("a-zA-Z",rawToChar(as.raw(c(122:97,90:65))),s))

Це анонімна функція. Використання:

> f=function(s)cat(chartr("a-zA-Z",rawToChar(as.raw(c(122:97,90:65))),s))
> f("Hello, World!")
Svool, Dliow!
> f("Programming Puzzles & Code Golf")
Kiltiznnrmt Kfaaovh & Xlwv Tlou
> f("This is
+ a multiline
+ example.")
Gsrh rh
z nfogrormv
vcznkov.

Серйозно, 31 байт (не конкуруючий)

úúû+╗úRúûR+╝,`;╜íuWD╛E(X0WX`Mεj

Шестнадцятковий дамп:

a3a3962bbba352a396522bbc2c603bbda1755744be452858305758604dee6a

Спробуйте це в Інтернеті

Досвід:

úúû+╗                             Put UPPERCASElowercase in reg0
     úRúûR+╝                      Put ESACREPPUesacrewol in reg1
            ,                     Fetch input.
             `             `Mεj   Map over the characters in string as list, joining result
              ;╜íu                Find 1-index of character in UPPERCASElowercase
                  W     0WX       If it is positive (present): 
                   D              Convert back to 0-index
                    ╛E            Look it up in ESACREPPUesacrewol
                      (X          Delete the original character.
                                  (Else just leave the original character unchanged.)

Я щойно зрозумів, що специфікація скаже, що додаткового пробілу немає, але немає можливості придушити затримки нових рядків у програмі "Серйозно", тому немає серйозного рішення.

Рубін, 40 байт

Нове рішення: Вкрасти цю трохи чарівну гору з деяких інших публікацій тут:

->s{s.gsub(/[a-z]/i){($&.ord+4^31).chr}}

Рубі, 55 46 байт

->s{s.tr'a-zA-Z',[*?A..?Z,*?a..?z].reverse*''}

9 байт вимкнено завдяки @manatwork

пробіг:

->s{s.gsub(/[a-z]/i){($&.ord+4^31).chr}}["Kiltiznnrmt Kfaaovh & Xlwv Tlou"]
=> "Programming Puzzles & Code Golf"

Джольф, 15 байт

~Ai+plpu+_pl_pu
~A              I don't know what to call this, besides "dictionary replace"
  i              the input
   +plpu         previous dictionary: lower + upper alphabet
        +_p1_pu  new dictionary: reversed lower + reversed upper

Тестовий набір або спробуйте його власним вкладом

𝔼𝕊𝕄𝕚𝕟 2, 12 символів / 26 байт (неконкурентно)

ïĪ(ᶐ+ᶛ,ᶐᴙ+ᶛᴙ

Try it here (Firefox only).

Додано функцію транслітерації після публікації виклику.

Пояснення

ïĪ(ᶐ+ᶛ,ᶐᴙ+ᶛᴙ // implicit: ï=input
ïĪ(           // transliterate ï...
   ᶐ+ᶛ,       // from uppercase+lowercase alphabet...
       ᶐᴙ+ᶛᴙ  // ... to reversed uppercase+reversed lowercase alphabet
              // implicit output

CJam, 21 байт

q'[,65>__el_@+W%@@+er

Не оптимальне рішення ... все ж ... Спробуйте в Інтернеті

Важко пояснити без групування речей, тому ось загальне пояснення: отримує введення, двічі натискає алфавіт з великим і нижчим регістром, обертає речі навколо, поєднує великі і малі рядки, перевертає один і використовує транслітерацію (подібно до відповіді на Retina).

C (функція), 50

f(char*s){for(;*s;s++)*s=isalpha(*s)?*s+4^31:*s;}

Це спирається на всі три попередні відповідях на C, тож слід почитати @Ruud, @Danwakeem та @ edc65.

Ця функція змінює масив char на місці.

Я розумію, що введення функцій дозволяється, якщо прямо не заборонено в питанні.

Спробуйте в Інтернеті.

PostgreSQL, 118 125 байт

SELECT s,TRANSLATE(s,t||UPPER(t),REVERSE(t)||REVERSE(UPPER(t)))
FROM(SELECT text'Programming Puzzles & Code Golf's,text'abcdefghijklmnopqrstuvwxyz't)r

SqlFiddleDemo

Вихід:

╔══════════════════════════════════╦═════════════════════════════════╗
║                s                 ║            translate            ║
╠══════════════════════════════════╬═════════════════════════════════╣
║ Programming Puzzles & Code Golf  ║ Kiltiznnrmt Kfaaovh & Xlwv Tlou ║
╚══════════════════════════════════╩═════════════════════════════════╝

Вхід: SELECT text'...'s

Редагувати:

Введіть як таблицю:

SELECT s,TRANSLATE(s,t||UPPER(t),REVERSE(t)||REVERSE(UPPER(t)))
FROM i,(SELECT text'abcdefghijklmnopqrstuvwxyz't)r
GROUP BY s,t

SqlFiddleDemo

Вихід:

╔══════════════════════════════════╦═════════════════════════════════╗
║                s                 ║            translate            ║
╠══════════════════════════════════╬═════════════════════════════════╣
║ Hello, World!                    ║ Svool, Dliow!                   ║
║ Programming Puzzles & Code Golf  ║ Kiltiznnrmt Kfaaovh & Xlwv Tlou ║
║ abcdefghijklmnopqrstuvwxyz       ║ zyxwvutsrqponmlkjihgfedcba      ║
╚══════════════════════════════════╩═════════════════════════════════╝

Пітон 3, 195 169 168 166 байт

Завдяки @TrangOul за -2 байти!

Як я не бачив, що я міг би пограти в цей гольф раніше?

x=__import__('string').ascii_letters;y,z=x[26:],x[:26];a,b=y[::-1],z[::-1];print(''.join(b[z.index(i)]if i in b else a[y.index(i)]if i in a else i for i in input()))

(сорта) неозорих:

x = __import__('string').ascii_letters;
y, z = x[26: ], x[: 26];
a, b = y[::-1], z[::-1];
print(''.join(b[z.index(i)]
    if i in b
    else a[y.index(i)]
    if i in a
    else i
    for i in input()
))

Спробуйте це на Ideone!

Пітон, 61 байт

lambda x:''.join([c,chr(ord(c)+4^31)][c.isalpha()]for c in x)

Анонімна функція. Що стосується літер, чи виконується операція реверсування бітового подання, додаючи 4, потім гортаючи останні п'ять біт, подібно до відповіді Javascript від ETHproductions .

Хаскелл, 119 104 байт

Збережено 15 байт завдяки @nimi.

c=fromEnum;s=toEnum;f[]="";f(x:y)|64<c x&&c x<91=s(155-c x):f y|96<c x&&c x<123=s(219-c x):f y|0<1=x:f y

Використання:

f "abcdefghijklmnopqrstuvwxyz"
"zyxwvutsrqponmlkjihgfedcba"

f "Programming Puzzles & Code Golf"
"Kiltiznnrmt Kfaaovh & Xlwv Tlou"

f "Hello, World!"
"Svool, Dliow!"

Пояснення

let c=fromEnum;s=toEnum;--wrap names for later use, fromEnum gets ascii code from char, toEnum gets char from ascii code
f[]=[];                 --feed empty list (of chars in this case), get empty list
f(x:y)                  --feed a list, separate the first element and...
|64<c x&&c x<91=        --if its an uppercase char (using ascii code range)...
s(c x*(-1)+155)         --  inverse its ascii code value, move it to the range of uppercase and get the new char
                        --  (like rotating half turn a ruler by the side and then sliding it to the space it previously occupied)
:f y                    --  feed the rest of the list and stick the new char in front of the result
|96<c x&&c x<123=       --if its a lowercase char (using ascii code range)...
s(c x*(-1)+219)         --  inverse its ascii code value, move it to the range of lowercase and get the new char
:f y                    --  feed the rest of the list and stick the new char in front of the result
|True=x:f y             --otherwise feed the rest of the list and stick the char in front of the result

Я новачок в Haskell ... в функціональному програмуванні ... і на сайті, і я знаю, що є (багато) кращих відповідей на це питання, але майте на увазі.

Perl 6 , 28 байт

{S:g/\w/{chr $/.ord+4+^31}/}

Використання:

# give it a lexical name
my &swap = { … }

say swap 'Programming Puzzles & Code Golf';
# Kiltiznnrmt Kfaaovh & Xlwv Tlou

say swap ('a'..'z').join
# zyxwvutsrqponmlkjihgfedcba

Java, 136 байт

void x(String i){for(char c:i.toCharArray()){if(Character.isLetter(c))c=c<91?(char)(90-(c-65)):(char)(122-(c-97));System.out.print(c);}}

Приклад використання:

class Test {
  static void x(String i){for(char c:i.toCharArray()){if(Character.isLetter(c))c=c<91?(char)(90-(c-65)):(char)(122-(c-97));System.out.print(c);}}
  public static void main(String[] args) {
    x("Programming Puzzles & Code Golf");
    // produces "Kiltiznnrmt Kfaaovh & Xlwv Tlou"
  }
}

Мабуть, найгірша поширена мова з точки зору розміру байтів.

Оболонка Unix + tr + printf, 35 байт

tr A-Za-z `printf %s {Z..A} {z..a}`

Ось ви, канонічна відповідь у тр. Я подумав, як питання про транслітерацію алфавіту може пройти без канонічної відповіді на тр анклітерацію алфавіту?

tr сам по собі навіть не робить "Привіт, світ!" і як така не мова програмування, тому я позначив відповідь як неконкурентну ^[1] .

[1]: Редагувати: Власне, оболонка Unix - це мова, а tr - стандартна бібліотека . Завдяки Downgoat та Digital Trauma за те, що допомогли мені помітити це.

05AB1E , 5 байт [неконкуренто]

žnžo‡

Використовує набір символів CP-1252 .

Спробуйте в Інтернеті!

Пояснення:

žn    - Push [A-Za-z]
  žo  - Push [Z-Az-a]
    ‡ - Transliterate.

MATL , 21 28 байт

Використовується версія 6.0.0 , яка є раніше, ніж ця проблема. Код працює в Octave.

jttk2Y2mXK)o31Z~4-cK(

Приклад

>> matl
 > jttk2Y2mXK)o31Z~4-cK(
 >
> Hello, World!
Svool, Dliow!

Пояснення

j             % input string
t             % duplicate
tk            % duplicate and convert to lowercase
2Y2           % string 'abc...xyz'
m             % "ismember" function: produces logical index of letter positions
XK            % copy to clipboard K
)             % index into string to get its letters
o31Z~4-       % bitwise XOR with 31 and subtract 4
c             % convert to char
K             % paste logical index from clipboard K
(             % put back modified letters into original string

Старий підхід, 28 байт

j1Y2!tkh"t@2#m@0v27b-)wXK)K(

MATLAB, 61 байт

@(x)[abs(-x+ismember(x,65:90)*155+ismember(x,97:122)*219),'']

Я спробував f=@ismember, і зробивши діапазон a=65:90змінною і зробіть 32+aу другому ismember-виклик. Все це скоротило код, але призвело б до програми і, таким чином, вимагало і dispі, іinput .

Це дає:

ans('Hello, World!')
ans =
Svool, Dliow!

ans('Programming Puzzles & Code Golf')
ans =
Kiltiznnrmt Kfaaovh & Xlwv Tlou

Брахілог , 66 байт

_|hH(:64>:91<,77-H+78=X;H:96>:123<,109-H+110=X;HX),[X]:"~c"w,?b:0&

Відсутність вбудованих модулів насправді шкодить цьому, тому нам доводиться вдаватися до старих хороших обчислень ASCII-кодів.

Присудок brachylog_main очікує, що рядок коду символів є вхідним, а не вихідним, наприкладbrachylog_main(`Hello, World!`,_).

Пояснення

_                                                                  § If the input is empty,
                                                                   § return true
                                                                   §
 |                                                                 § Else
                                                                   §
  hH(                                            ),[X]:"~c"w       § Print variable X which
                                                                   § depends on the head of
                                                                   § the input as a char code
                                                                   §
                                                            ,?b:0& § Recursive call on the
                                                                   § tail of the input
                                                                   §
     :64>:91<,77-H+78=X                                            § If H is capital, X =
                                                                   § 77 - H + 78
                       ;                                           § Else if H is non-cap, X=
                        H:96>:123<,109-H+110=X                     § 109 - H + 110
                                              ;                    § Else (not a letter)
                                               HX                  § H = X    

Perl 6, 40 39 байт

Оскільки всі інші виконують анонімні функції:

my &f=*.trans(/\w/=>{chr $/.ord+4+^31})

(Дякую @ b2gills за пораду)

Використовує той самий біт, що гортає вуду, як і деякі інші пости. Я не був впевнений, чи включати в число байтів декларацію змінної / функції, тому зробив про всяк випадок. Без нього це рішення - лише 34 байти.

Використання:

> f "zyxwvutsrqponmlkjihgfedcba"
abcdefghijklmnopqrstuvwxyz
> f "Kiltiznnrmt Kfaaovh & Xlwv Tlou"
Programming Puzzles & Code Golf
> f "Svool, Dliow!"
Hello, World!

Пітон 3, 164 159 байт

def f(t,a="abcdefghijklmnopqrstuvwxyz",b=""):
 for c in t:u=64<ord(c)<91;c=c.lower();c=a[::-1][a.index(c)] if c in a else c;b+=c.upper() if u else c
 return b