2つの単語を入力として使用し、人気のある英語の舌ねじれの変形を出力する関数またはプログラムを作成します。

出力は最初の単語を4回使用します

• どのくらいwoodでしょうwoodチャックチャックがあればwood、チャックは、チャック可能性がwood？

そして2番目の単語は4回

• chuck chuck木材chuckがchuck木材にできる場合、木材はどれくらいの量になるでしょうか？

残りの出力はどの入力でも同じです。

• How muchウッドwould aチャックチャックif aウッドcouldチャックチャック木材?

入力と出力は、言語がテキストの文字列を処理していると合理的に認識する任意の形式にすることができます。出力は、大文字、スペース、その欠如、および疑問符の終了を含む、指定された形式で正確に指定する必要があります。オプションの末尾の改行も使用できます。

理想的には、コードは印刷可能なASCII文字を含む入力を処理します。ただし、入力を印刷可能なASCIIの妥当なサブセットに制限することは許可されています。答えでこれを示してください。もちろん、より大きな文字セットの処理は問題ありません。

入出力ペアの例：

"wood", "chuck"
"How much wood would a woodchuck chuck if a woodchuck could chuck wood?"

"ground", "hog"
"How much ground would a groundhog hog if a groundhog could hog ground?"

"bar", "keep"
"How much bar would a barkeep keep if a barkeep could keep bar?"

"money", "belt"
"How much money would a moneybelt belt if a moneybelt could belt money?"

"rain", "fall"
"How much rain would a rainfall fall if a rainfall could fall rain?"

"hair", "cut"
"How much hair would a haircut cut if a haircut could cut hair?"

"green", "house"
"How much green would a greenhouse house if a greenhouse could house green?"

"jabber", "wock"
"How much jabber would a jabberwock wock if a jabberwock could wock jabber?"

"pine", "apple"
"How much pine would a pineapple apple if a pineapple could apple pine?"

"Rob", "Lowe"
"How much Rob would a RobLowe Lowe if a RobLowe could Lowe Rob?"

"code", "golf"
"How much code would a codegolf golf if a codegolf could golf code?"

"fish", ""
"How much fish would a fish  if a fish could  fish?"

"", "fish"
"How much  would a fish fish if a fish could fish ?"

"", ""
"How much  would a   if a  could  ?"

"  ", "     "
"How much    would a               if a         could         ?"

"would a", "how much"
"How much would a would a would ahow much how much if a would ahow much could how much would a?"

これはコードゴルフですであるため、最小バイトが勝ちます。他の言語がより少ないバイトでそれを行うことができるとしても、答えはすべての言語で歓迎されています。

（このミームに触発され、この剛体パターンよりも1つの入力ペアを使用します。...）

Pythonの3、70の 67バイト

"How much {0} would a {0}{1} {1} if a {0}{1} could {1} {0}?".format

オンラインでお試しください！

靴が収まるなら

タイプミスをキャッチしてくれたマナトワークに感謝

優れた-3バイトのアイデアを提供してくれたRemco Haszingに感謝

私はこれがまだ有効な提出であるという仮定から逃げています（男だから、試してはいけないのでクールです）。OPがこれが許容できるかどうかを明確にできたら（私は書いていないのでそれ自体は関数をし）、それは高く評価されるでしょう。

更新：祝福を受けました、すべてが良いです:)

前のバージョン：

lambda a,b:f"How much {a} would a {a+b} {b} if a {a+b} could {b} {a}?"

T-SQL、82バイト

SELECT'How much '+w+' would a '+w+c+' '+c+' if a '+w+c+' could '+c+' '+w+'?'FROM t

IOルールに従って、列wとcを持つ既存のテーブル$t$から入力が取得されます。$w$$c$

1バイト長くなりますが、何らかの理由で少しだけ快適です。

SELECT REPLACE(REPLACE('How much 1 would a 12 2 if a 12 could 2 1?',1,w),2,c)FROM t

このバージョンは、最初の単語wに数字を含まない入力のサブセットで動作します2$w$ます。

私はSQLを使用しているため、すべての例をテーブルにプリロードし、それらを一度に実行できます。

Bash、50バイト

echo How much $2 {would,$1\ if}\ a\ $2$1 could $@?

オンラインでお試しください！

以下のコメントの助けにより、-5バイト。

スタックス、33 31 30 29 バイト

-1 再帰のおかげで！

¢èO∩sP↑å♥|1╧ì}ò♂xb■δå«█Γ╨╦►Q²

staxlang.xyzで実行してデバッグしてください！

各コンポーネントを逆の順序でスタックにプッシュしてから、すべてをスペースで結合します。

解凍（35バイト）および説明：

X'?+;`IM'`x;+Y`~^$`,y`75\`x`Q)("`LJ
X                                      Set register X to the first word
                                       "wood"
 '?+                                   Append a question mark, popping from the input stack
                                       "wood?"
    ;                                  Peek from input stack and push to main stack
                                       "chuck" "wood?"
     `IM'`                             Literal "could"
                                       "could" "chuck" "wood?"
          x;+Y                         Peek register x. Peek input. Concatenate. Set register Y.
                                       "woodchuck" "could" "chuck" "wood?"
              et cetera, ad nauseam
                                  LJ   Listify the stack and join with spaces
                                       Implicit print

``の間はすべて圧縮された文字列リテラルです。そのコンマは重要です。入力スタックから最後に読み取ったとき、出力の最後に余分な「チャック」が入らないように、ピークではなくポップする必要があります。

いくつかのテストケースでは、両方の入力を同じ行に配置し、逆の順序になっていることに気付くでしょう。これは、入力として空の文字列またはスペースの文字列を取得するために必要です。

27 26バイト、入力に制限あり

å▓Zf╢7)╪♪²p╞8ó╪l▼]<¡REïSèΣ

staxlang.xyzで実行してデバッグしてください！

@dzaimaのSOGLと同じように、最初の入力に小文字の 'y'が含まれていると失敗します。文字列「a byがybである場合、a by yはいくらですか？」をプッシュし、置換のペアを作成します。

JavaScript、70バイト

退屈な！

a=>b=>`How much ${a} would a ${a+b} ${b} if a ${a+b} could ${b} ${a}?`

オンラインでお試しください！

少し退屈です！

a=>"How much 0 would a 01 1 if a 01 could 1 0?".replace(/\d/g,x=>a[x])

オンラインでお試しください！

SOGL、32 30 バイト

^.](9V;⅜‛°@Ε¬tπs%.½Ω‘⁽ b,ŗ y,ŗ

ここで試してみてください！

最初の入力に文字を含めることはできません y。これにはASCII（およびUnicode）の妥当なサブセットが残っているようです。

½ouiīZģ9Ο|ΧyΚ⅞ō÷Jeq(‚7‘は圧縮された文字列で"how much b would a by y if a by could y b?"（必要な単語がすべて圧縮率の高い辞書の上位512ワードにあるように選択された文字）、b1番目の入力とy2番目の入力に置き換えられます。

R、90 77 76バイト

-13 Sumner18に
感謝-1ジュゼッペに感謝

function(x,y,`[`=gsub)2[y,1[x,"How much 1 would a 12 2 if a 12 could 2 1?"]]

オンラインでお試しください！

PHP、72バイト

[,$a,$b]=$argv;echo"How much $a would a $a$b $b if a $a$b could $b $a?";

オンラインでお試しください！

または：

PHP、72バイト

How much <?=![,$a,$b]=$argv,"$a would a $a$b $b if a $a$b could $b $a?";

オンラインでお試しください！

コマンドラインからの入力、への出力STDOUT。

JavaScript（V8）、72バイト

(a,b)=>['How much',a,'would a',c=a+b,b,'if a',c,'could',b,a+'?'].join` `

オンラインでお試しください！

変数の割り当ては実際には0バイトを節約しますが、これをわずかに一意にするためだけに保持すると考えました。

ZX Spectrum Basic、87バイト

完全を期すため、簡単な実装：

INPUT a$,b$: PRINT "How much ";a$;" would a ";a$;b$;"  ";b$;" if a ";a$;b$;" could ";b$;" ";a$;"?"

を使用して IFキーワード（1バイト） 3バイト削減されますが、「大文字と同じ」条件は破られます。

INPUT a$,b$: PRINT "How much ";a$;" would a ";a$;b$;"  ";b$;" IF a ";a$;b$;" could ";b$;" ";a$;"?"

さび、75バイト

|a,b|print!("How much {} would a {0}{} {1} if a {0}{1} could {1} {0}?",a,b)

オンラインでお試しください！

を使用して このトリックするすると、フォーマットするアイテムごとにフォーマットインデックスを1回スキップできます。

またprint!()、文字列を作成format!()して返すよりも1バイト短いため、を使用します。

05AB1E、37 35 31 30 バイト

“Howƒ×1€Þ a ÿ0€¬ a ÿƒˆ01?“T$ú‡

@Grimyのおかげで-5バイト。

2つの項目のリストを取ります。wood最初の値chuckとして、2番目の値として。

オンラインそれを試してみたり、すべてのテストケースを確認してください。

説明：

“Howƒ×1€Þ a ÿ0€¬ a ÿƒˆ01?“
      # Push dictionary string "How much1 would a ÿ0 if a ÿ could01?",
      # where the `ÿ` are automatically filled with the (implicit) input-list,
      # implicitly joined together to a single string
      #  i.e. ["wood","chuck"] → "How much1 would a woodchuck0 if a woodchuck could01?"
T     # Push 10
 $    # Push the input-list and 1
  ù   # Pad the strings in the input-list with this 1 amount of leading spaces
      #  ["wood","chuck"] → [" wood"," chuck"]
   ‡  # Transliterate the 10 ([1,0]) to these strings in the sentence
      #  → "How much wood would a woodchuck chuck if a woodchuck could chuck wood?"
      # (after which the result is output implicitly)

（セクション鉱山のこの05AB1Eチップを参照してください。辞書を使用する方法？）理由を理解すること“Howƒ×1€Þ a ÿ0€¬ a ÿƒˆ01?“です"How much1 would a ÿ0 if a ÿ could01?"。

Applesoft BASIC、 77 76バイト

1INPUTA$,B$:?"How much "A$" would a "A$B$" "B$" if a "A$B$" could "B$" "A$"?

上記は適切なBASICのようには見えませんが、ApplesoftはPRINTステートメントを使用する際にいくつかのショートカットを許可しています。

• ステートメントを入力するときの?代わりの使用PRINT
• 連結文字（;または+）は省略できます
• ステートメントが引用符付き文字列で終わる場合、最後の引用符は省略できますThanks、Mark！

行番号が必要です。そうでない場合、INPUTステートメントにより?ILLEGAL DIRECT ERROR

33、78のバイト

"How much "p1btpt" would a "ptpz2btp" "ptbtp" if a "ptpbtp" could "ptbtp" "ptp

オンラインでお試しください！

入力をコマンドライン引数として受け取ります。

ボーナス：91バイト

"How much "p1bztp" would a "p1bztp2bztp" "p2bztp" if a "p1bztp2bztp" could "p2bztp" "p1bztp

オンラインでお試しください！

入力が与えられたときに自分自身に似た出力を与え1bztp、2bztp

Kotlin、59バイト

{i,j->"How much $i would a $i$j $j if a $i$j could $j $i?"}

オンラインでお試しください！

PowerShell、65バイト

param($a,$b)"How much $a would a $a$b $b if a $a$b could $b $a`?"

オンラインでお試しください！

唯一の注意事項は、疑問符をエスケープする必要があることです。疑問符はPowerShell識別子の有効な部分になる可能性があるためです。

VBA、107バイト

Function q(a,b)
b=b&" "
c="ould "
q="How much "&a&" w"&c&"a "&a&b&b&"if a "&a&b&"c"&c&b&a&"?"
End Function

VBScriptとしても実行する必要があるため、2つのショートカットを使用しました。「ould」は繰り返され、「chuck」は追加のスペースなしでは表示されません。

C位、165の 148 133バイト

class P{static void Main(string[]a){System.Console.Write("How much {0} would a {0}{1} {1} if a {0}{1} could {1} {0}?\n",a[0],a[1]);}}

補間された文字列について教えてくれたAndrew Baumherに感謝します!!
編集：フルクラスが追加されました
編集：ケネスKに短縮のヒントを提供してくれて
ありがとう編集：補間された文字列の使用が実際にこのシナリオで長いことを教えてくれたアンドリューに再び感謝

Haskell、76バイト

a?b=a++" "++b
a!b="How much"?a?"would a"?a++b?b?"if a"?a++b?"could"?b?a++"?"

オンラインでお試しください！

最初に試してみてください。ルールを破らなかったことを願っています。

ゼリー、39 バイト

ŒPKŒP“µkþ¿µ‘ị“þ>Æƈ)taJṖ;ạʂ\4S%dñl»Ỵ¤ż”?

2つの文字列のリストを受け入れる完全なプログラム。

オンラインでお試しください！

...または（2つの文字列のリストを受け入れる完全なプログラム）

⁽4ṀDBịs€2ṭ€€⁶“þ>Æƈ)taJṖ;ạʂ\4S%dñl»Ỵ¤ż”?

オンラインでお試しください！

Python 3、80バイト

lambda n:'How much {0} would a {0}{1} {1} if a {0}{1} could {1} {0}?'.format(*n)

オンラインでお試しください！

ローマの場合は、str形式を使用します。

squidのトリックを使用して編集。

C＃（Visual C＃Interactive Compiler）、66 65バイト

x=>y=>$"How much {x} would a {x+y} {y} if a {x+y} could {y} {x}?"

オンラインでお試しください！

C＃を除き、他の全員と同じです。（a、b）=> cの代わりにカリー化ストラトa => b => cを使用して-1バイト

R、95バイト

function(a,b)cat("How much ",a," would a ",a,b," ",b," if a ",a,b," could ",b," ",a,"?",sep='')

オンラインでお試しください！

APL（Dyalog Unicode）、56 59バイト

{∊'How much '⍺' would a '⍺⍵' '⍵' if a '⍺⍵' could '⍵' '⍺'?'}

オンラインでお試しください！

かなり簡単なdfn。カットしてバイトを保存します∊単一の文字列ではなく文字列の配列を返すことが許可場合は。

疑問符を追加するのを忘れていたため、3バイトが追加されました。

Wolfram言語（Mathematica）、68バイト

StringRiffle@{How,much,#,would,a,c=#<>#2,#2,if,a,c,could,#2,#<>"?"}&

オンラインでお試しください！

ゼリー、41 37バイト

⁾be,y“Ø[gœıJ9°m.OṚuHlh3Ƥ⁾$ɲ0øḲʂṇHẎṆȥ»

オンラインでお試しください！

引数として文字列のペアを取り、処理された文字列を出力する完全なプログラム。モナFドリンクは、末尾にa を追加することで形成できます（これを指摘してくれた@JonathanAllanに感謝します）。

@dzaimaのSOGL回答に触発されて、プレースホルダーとして「b」と「e」を使用するようになりましたので、必ずそれも支持してください！つまり、最初の単語に文字eを含めることはできません。

Japt -S、44 39バイト

[`How Û2`U`Ùd a`N=¬V`if a`N`Öd`VU+'?]

それを試してみてください

Forth（gforth）、116バイト

: x 2over type ; : y 2dup type ; : f ." How much "x ."  would a "x y ."  "y ."  if a "x y ."  could "y ."  "x ." ?";

オンラインでお試しください！

コードの説明

\ x = output the first word
: x               \ start a new word definition
  2over type      \ copy the "first" word to the top of the stack and print it
;                 \ end word definition

\ y = output the second word
: y               \ start a new word definition
  2dup type       \ copy the "second" word to the top of the stack and print it
;                 \ end word definition

: f               \ start a new word definition
  ." How much "x  \ print "How much " followed by the first word   
  ."  would a "x  \ print " would a " followed by the first word
  y ."  if a "x   \ print the second word followed by " if a " and then the first word
  y ."  could "y  \ print the second word, then " could " then the second word again
  ."  "x ." ?"    \ print a space followed by the first word, followed by "?"
;                 \ end word definition

Lua、82バイト

a,b=...print((('How much x would a xy y if a xy could y x?'):gsub('.',{x=a,y=b})))

オンラインでお試しください！

完全なプログラム。入力を引数として受け取ります。

ここでは特別なことは何もありません。短いバージョンがあることを願っていますが、一見するとこれを短くする明らかな方法はありません。

Bash、58バイト

echo "How much $1 could a $1$2 $2 if a $1$2 could $2 $1?"

入力をコマンドライン引数として受け取ります。 オンラインでお試しください！