_{これは、言語Add ++に最近追加した関数に触発されました。したがって、Add ++で短い回答を送信しますが、勝った場合は受け入れません（公平ではありません）}

数字を掛けることはできるが、文字列は掛けられないときは嫌いではありませんか？だから、あなたはそれを修正するべきですよね？

入力として2つの空でない文字列を取り、乗算されたバージョンを出力する関数または完全なプログラムを作成します。

文字列をどのように乗算しますか？私が教えてやろう！

2つの文字列を乗算するには、2つの文字列を取り、各文字を比較します。次に、最高のコードポイントを持つ文字が出力に追加されます。それらが等しい場合は、単に文字を出力に追加します。

文字列の長さが等しいとは限りません。長さが異なる場合、最終文字列の長さは最短文字列の長さになります。入力は常に小文字で、0x20 - 0x7E大文字を除く印刷可能なASCII範囲内の任意の文字（）を含めることができます。

文字列、リストなど、合理的な形式で出力できます。賢明なことに、整数はこのチャレンジで出力する賢明な方法ではありません。

入力を持つhello,とworld!、これは、それがどのように動作するかです

hello,
world!

w > h so "w" is added ("w")
o > e so "o" is added ("wo")
r > l so "r" is added ("wor")
l = l so "l" is added ("worl")
d < o so "o" is added ("worlo")
! < , so "," is added ("worlo,")

最終的な出力のためにそうhello,してworld!だろうworlo,！

より多くのテストケース

（手順なし）

input1
input2 => output

programming puzzles & code golf!?
not yet graduated, needs a rehaul => prtgyetmirgduuzzlesneedsde rolful

king
object => oing

blended
bold => boln

lab0ur win.
the "super bowl" => the0usuwir.

donald j.
trumfefe! => trumlefj.

これはコードゴルフなので、最短のコードが勝ちます！ルオク！

Haskell、11バイト

zipWith max

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

説明することはあまりありません。

05AB1E、4バイト

øΣà?

05AB1Eエンコードを使用します。オンラインでお試しください！

Perl 6、22バイト

{[~] [Zmax] @_».comb}

ボーナスとして、2つだけでなく、任意の数の被乗数を受け入れます。

Japt、16バイト

ñl g îUy ®¬ñ oÃq

オンラインでテストしてください！入力を2つの文字列の配列として受け取ります。

ここで最小と最大のビルトインの欠如はJaptを傷つけますが、それでもややまともなスコアを達成することができます...

説明

 ñl g îUy ®   ¬ ñ oà q
Uñl g îUy mZ{Zq ñ o} q
                        // Implicit: U = input array     ["object", "king"]
       Uy               // Transpose the strings of U.   ["ok", "bi", "jn", "eg", "c ", "t "]
          mZ{      }    // Map each string Z to
             Zq ñ o     //   the larger of the two chars. (Literally Z.split().sort().pop())
                        //                               ["o", "i", "n", "g", "c", "t"]
                     q  // Join into a single string.    "oingct"
Uñl g                   // Sort the two input strings by length and take the shorter.
      î                 // Trim the previous result to this length.
                        //            "king"î"oingct" -> "oing"
                        // Implicit: output result of last expression

ゼリー、5バイト

żœ-"«

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

使い方

żœ-"«  Main link. Arguemts: s, t (strings)

ż      Zipwith; form all pairs of corresponding characters from s and t.
       If one of the strings is longer than the other, its extra characters are 
       appended to the array of pairs.
    «  Dyadic minimum; get all minima of corresponding characters.
       This yields the characters themselves for unmatched characters.
 œ-"   Zipwith multiset subtraction; remove a single occurrence of the minimum from
       each character pair/singleton.
       This yields the maximum for pairs, but an empty string for singletons.

例

してみましょうS =ブレンドし、T =大胆。

ż収量["bb", "lo", "el", "nd", 'd', 'e', 'd']。最後の3つの要素は文字です。

«は、ベクトル化、2項式の最小値であるため、が得られ['b', 'l', 'e', 'd', 'd', 'e', 'd']ます。

œ-"最初の配列のn ^番目の文字列/文字から、2番目の配列のn ^番目の文字を1回だけ削除して、を生成します。はマルチセット減算アトムであり、クイックはそれをベクトル化します。["b", "o", "l", "n", "", "", ""]œ-"

印刷すると、これは単にbolnを読み取ります。

PHP> = 7.1、52バイト

for(;$t=min(~$argv[1][$i],~$argv[2][$i++]);)echo~$t;

PHPサンドボックスオンライン

PHP> = 7.1、69バイト

for([,$a,$b]=$argv;(~$c=$a[$i])&&~$d=$b[$i++];)$r.=max($c,$d);;echo$r;

PHPサンドボックスオンライン

PHP> = 7.1、70バイト

for([,$a,$b]=$argv;(~$c=$a[$i])&&~$d=$b[$i++];)$r.=$c>$d?$c:$d;echo$r;

PHPサンドボックスオンライン

アリス、8バイト

/oI\
@m+

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

説明

Aliceにもこの演算子（superimposeと呼びます）がありますが、出力を短い文字列の長さに制限しません（代わりに、長い文字列の残りの文字が追加されます）。ただし、2つの文字列の長い方を短い方の長さに切り捨てる演算子もあります。

/   Reflect to SE, switch to Ordinal. The IP bounces diagonally up and down
    through the code.
m   Truncate, doesn't really do anything right now.
I   Read a line of input.
    The IP bounces off the bottom right corner and turns around.
I   Read another line of input.
m   Truncate the longer of the two input lines to the length of the shorter.
+   Superimpose: compute their elementwise maximum. 
o   Output the result.
@   Terminate the program.

網膜、28バイト

{O^`
G`.
^.+$

M!\*`^.
Rm`^.

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

説明

{O^`

{それは、作業文字列を変更するために失敗するまでループでプログラム全体を実行するために、網膜に指示します。Oこれはデフォルトで空でない行をソートするソート段階になります。^オプションでは、結果を逆転させます。したがって、実際には、空でない場合は2行の逆の並べ替えが行われ、先頭に大きな文字が配置された行が配置されます。

G`.

空行がある場合は破棄します。

^.*$

1行しか残っていない場合、1行は空でしたが、もう1行も削除してプロセスを停止します。

M!\*`^.

ここで多くの設定が行われています。これMは、作業文字列の最初の文字（）に一致し（）、^.それを返し（!）、末尾の改行なしで印刷し（\）、作業文字列を前の値に戻します（*）。つまり、実際に文字列を変更せずに、作業文字列の最初の文字（最大の先頭文字）を単に印刷します。

Rm`^.

最後に、各行から最初の文字を削除して、次の反復で次の文字を処理します。

C、58バイト

f(char*s,char*t){putchar(*s>*t?*s:*t);*++s&&*++t&&f(s,t);}

オンラインで試す

• -8バイト@Steadybox

JavaScript（ES6）、47 45バイト

f=
(a,b)=>a.replace(/./g,(c,i)=>c>b[i]?c:[b[i]])

<div oninput=o.textContent=f(a.value,b.value)><input id=a><input id=b><pre id=o>

c>b[i]の終わりを過ぎると便利にfalseを返しますb。編集：@ETHproductionsのおかげで2バイト保存されました。

ゼリー、6バイト

żḊ€ṁ@»

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

Mathematica、78バイト

FromCharacterCode[Max/@Thread[#~Take~Min[Length/@x]&/@(x=ToCharacterCode@#)]]&

Mathematicaにはすでに別の答えがあります。この回答は文字列のリストとして入力を受け取るため/@、の#代わりに使用できます{##}。そしてMap、オブジェクトを変数に割り当てる代わりに、オブジェクトの長い関数名のみを使用できます。（実際、各Mathematica組み込みシンボル名は関数内で最大1回使用されます）

Java 8、124 120 117 63バイト

a->b->{for(int i=0;;i++)System.out.print(a[i]>b[i]?a[i]:b[i]);}

@ Khaled.Kのおかげで-4バイト。@Jakobの
おかげで-3バイト。

入力は2つの文字配列で、で終わりますArrayIndexOutOfBoundsException。

説明：

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

a->b->{                       // Method with two char-array parameters and no return-type
  for(int i=0;;i++)           //  Loop `i` from 0 up indefinitely (until an error is given)
    System.out.print(         //   Print:
      a[i]>b[i]?a[i]:b[i]);}  //    The character that has the highest unicode value

C＃、81 78バイト

a=>b=>{var s="";try{for(int q=0;;q++)s+=a[q]>b[q]?a[q]:b[q];}catch{}return s;}

C＃は変換を暗黙的charにint（a charは実際にはint下にあるので）持っていますが、これは最短の文字列を探すのではなく、失敗するまで試してください

MATL、8バイト

otX>cwA)

入力は、次の形式の文字列のセル配列です。 {'abcd' 'efg'}

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

余談ですが、これは3つ以上の文字列でも機能します。

説明

入力を検討してください{'blended' 'bold'}。スタックは上下逆さまに表示され、最新の要素が下に表示されています。

o    % Implicitly input a cell array of strongs. Convert to numeric
     % vector of code points. This right-pads with zeros if needed
     %   STACK: [98 108 101 110 100 101 100;
                 98 111 108 100   0   0   0]
tX>  % Duplicate. Maximum of each column
     %   STACK: [98 108 101 110 100 101 100;
                 98 111 108 100   0   0   0],
                [98 111 108 110 100 101 100]
c    % Convert to char
     %   STACK: [98 108 101 110 100 101 100;
                 98 111 108 100   0   0   0],
                'bolnded'
w    % Swap
     %   STACK: 'bolnded'
                [98 108 101 110 100 101 100;
                 98 111 108 100   0   0   0]
A    % All: gives true (shown as 1) for columns containing only nonzeros
     %   STACK: 'bolnded'
                [1 1 1 1 0 0 0]
)    % Use as logical index (mask). Implicitly display
     %   STACK: 'boln'

R、103バイト

コード：

n=min(sapply(y<-strsplit(scan(,"",sep="\n"),""),length));cat(mapply(max,el(y)[1:n],y[[2]][1:n]),sep="")

テストケース：

> n=min(sapply(y<-strsplit(scan(,"",sep="\n"),""),length));cat(mapply(max,el(y)[1:n],y[[2]][1:n]),sep="")
1: programming puzzles & code golf!?
2: not yet graduated, needs a rehaul
3: 
Read 2 items
prtgretmirgduuzzlesneedsde rolful
> x <- scan(,"",sep=NULL)
1: asd asd 
3: 
Read 2 items
> n=min(sapply(y<-strsplit(scan(,"",sep="\n"),""),length));cat(mapply(max,el(y)[1:n],y[[2]][1:n]),sep="")
1: king
2: object
3: 
Read 2 items
oing
> n=min(sapply(y<-strsplit(scan(,"",sep="\n"),""),length));cat(mapply(max,el(y)[1:n],y[[2]][1:n]),sep="")
1: lab0ur win.
2: the "super bowl"
3: 
Read 2 items
the0usuwir.

パイソン2、47の 44 34バイト

musicman523のおかげで-3バイト。Blenderのおかげで-10バイト。

入力を文字列のリストとして受け取ります。

lambda a:''.join(map(max,zip(*a)))

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

V、28、24、21のバイト

Í./&ò
dd{JdêHPÎúúx
Íî

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

Hexdump：

00000000: cd2e 2f26 f20a 6464 7b4a 64ea 4850 cefa  ../&..dd{Jd.HP..
00000010: fa78 0acd ee                             .x...

@ nmjcman101のおかげで3バイト節約できました！

説明：

Í             " Globally substitute:
 .            "   Any character
  /           " With:
   &          "   That character
    ò         "   And a newline
dd            " Delete this line
  {           " Move to the first empty line
   J          " Delete this line
    dê        " Columnwise delete the second word
      HP      " Move to the first line, and paste the column we just deleted
        Î     " On every line:
         úú   "   Sort the line by ASCII value
           x  "   And delete the first character
Í             " Remove all:
 î            "   Newlines

CJam、12バイト

q~z{1/~e>o}%

入力は2つの文字列のリストです。2つの文字列の長さが異なる場合、プログラムはエラーで終了します（正しい出力を生成した後）。

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

説明

q~              e# Read input and evaluate
  z             e# Zip: list of strings of length 2, or 1 if one string is shorter
   {      }%    e# Map this block over list
    1/          e# Split the string into array of (1 or 2) chars
      ~         e# Dump the chars onto the stack
       e>       e# Maximum of two chars. Error if there is only one char
         o      e# Output immediately, in case the program will error

Clojure、31バイト

#(map(comp last sort list)% %2)

Yayは関数構成の場合:)文字列ではなく一連の文字を返しますが、印刷または正規表現の一致を除いて、Clojureでほとんど同じように機能します。

悲しいことにmax、キャラクターでは動作しません。

Javascript（ES2015）、66 63 49バイト

a=>b=>[...a].map((c,i)=>c>b[i]?c:b[i]||'').join``

説明：

a=>b=>                       // Function with two string parameters
  [...a]                     // Split a into array of characters
    .map((c, i) =>           // Iterate over array
      c>b[i] ? c : b[i]||'') //   Use the character with the larger unicode value until the end of the larger string
    .join``                  // Join the array into a string

以前のバージョン：

//ES2015
a=>b=>[...a].map((c,i)=>c>b[i]?c:b[i]).slice(0,b.length).join``    //63
a=>b=>a.split``.map((c,i)=>c>b[i]?c:b[i]).slice(0,b.length).join`` //66
a=>b=>a.split``.map((c,i)=>c>b[i]?c:b[i]).slice(0,Math.min(a.length,b.length)).join``   //85
a=>b=>{for(i=-1,c='';++i<Math.min(a.length,b.length);)c+=a[i]>b[i]?a[i]:b[i];return c}  //86
a=>b=>{for(i=-1,c='';++i<Math.min(a.length,b.length);)c+=a[d='charCodeAt'](i)>b[d](i)?a[i]:b[i];return c}   //105
a=>b=>a.split``.map((c,i)=>c[d='charCodeAt']()>b[d](i)?c:b[i]).slice(0,Math.min(a.length,b.length)).join``  //106

//With array comprehensions
a=>b=>[for(i of a.split``.map((c,i)=>c>b[i]?c:b[i]))i].slice(0,b.length).join``                             //79
a=>b=>[for(i of a.split``.map((c,i)=>c>b[i]?c:b[i]))i].slice(0,Math.min(a.length,b.length)).join``          //98
a=>b=>[for(i of ' '.repeat(Math.min(a.length,b.length)).split``.map((_,i)=>a[i]>b[i]?a[i]:b[i]))i].join``   //105
a=>b=>[for(i of Array.apply(0,Array(Math.min(a.length,b.length))).map((_,i)=>a[i]>b[i]?a[i]:b[i]))i].join`` //107
a=>b=>[for(i of a.split``.map((c,i)=>c[d='charCodeAt']()>b[d](i)?c:b[i]))i].slice(0,Math.min(a.length,b.length)).join``        //119
a=>b=>[for(i of ' '.repeat(Math.min(a.length,b.length)).split``.map((_,i)=>a[d='charCodeAt'](i)>b[d](i)?a[i]:b[i]))i].join``   //124
a=>b=>[for(i of Array.apply(0,Array(Math.min(a.length,b.length))).map((_,i)=>a[d='charCodeAt'](i)>b[d](i)?a[i]:b[i]))i].join`` //127

網膜、55 36バイト

^
¶
{O`¶.*
}`¶.(.*)¶(.)
$2¶$1¶
1!`.*

オンラインでお試しください！説明：結果を保持するために、行に接頭部が付けられます。両方の文字列にはまだ文字が残っていますが、入力はソートされ、最高のコードポイントを持つ先頭の文字が結果に移動され、他の先頭の文字は削除されます。最後に結果が出力されます。

殻、2バイト

z▲

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

「Ungolfed」/説明

これを利用しzip fて、より短いリストを切り捨てて、の引数が常に2つになるようにしますf。例zip f [1,2] [3,4,5] == zip f [1,2] [3,4] == [f 1 3, f 2 4]：

z   -- zip the implicit lists A,B with  - e.g. "ab" "bcd" (lists of characters)
 ▲  -- maximum                          -      [max 'a' 'b', max 'b' 'c']
    -- implicitly print the result      -      "bc"

Kotlin、50 41 37バイト

関数参照構文では-9バイト、拡張関数では-4バイト

fun String.x(o:String)=zip(o,::maxOf)

sおよびxが関数内ではなくスコープ内にある場合、このメソッドは16バイトのみです

s.zip(x,::maxOf)

デモ

PowerShell、75バイト

-join(1..(($a,$b=$args)|sort l*)[0].length|%{(,$a[$_-1],$b[$_-1]|sort)[1]})
#            ^input array unpack
#       ^string index generation offset by 1
#                         ^sort by length property, so output length matches shorter input
#                                           ^loop over indices
#                                       max of the two characters^
# ^output join

.ps1ファイルとして保存して実行

PS C:\> .\Get-MultipliedString.ps1 'hello,' 'world!'
worlo,

以前は、78バイト：

$i=0;-join$(while(($a=$args[0][$i])-and($b=$args[1][$i++])){($a,$b)[$b-gt$a]})

J、25バイト

>./&.(a.&i.)@(<.&#{."1,:)

説明

半分のバイトは、両方の入力の入力長を短くすることを解決するために使用されます（誰かが持っている場合、この部分の改善を見たいと思います）：

(<.&#{."1,:)

<.&#は、2つの長さの最小値で{."1,:あり、右の文字列の上に左の文字列を重ねた2行のテーブルの両方の行からその文字数を取得します。

>./&.(a.&i.)

Under動詞&.を使用して、各文字をASCIIインデックスに変換し、2つの数字の最大値を取得してから、文字に戻します。

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

Java 8 + Eclipseコレクション、70 64バイト

a->b->a.zip(b).collect(p->(char)Math.max(p.getOne(),p.getTwo()))

aそしてb両方ともMutableList<Character>日食のコレクションから。

Add ++、8バイト

D,f,@@,^

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

バージョン0.4から1.11では^、引数のタイプに応じて、2つの数値を指数化するか、2つの文字列を「乗算」します。

Mathematica、102バイト

T=ToCharacterCode;L=Length;(a=T@#;b=T@#2;FromCharacterCode@Table[Max[a[[i]],b[[i]]],{i,L@a~Min~L@b}])&

入力

[「ブレンド」、「太字」]

APL（Dyalog）、22バイト

2つ（またはそれ以上）の文字列を正しい引数として受け取ります。

{⎕UCS⌈⌿⎕UCS↑⍵↑¨⍨⌊/≢¨⍵}

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

{ 右引数が表され匿名関数⍵

 ⎕UCS に対応するU nicode C haracter S et のシンボル

 ⌈⌿ の各列の最大値

 ⎕UCSU nicode C haracter S et  のコードポイント

 ↑ matrified（文字列のリストからの行列）

 ⍵ 引数

 ↑¨⍨ それぞれでキャップ

 ⌊/ 最小の

 ≢¨ 長さ

 ⍵ 引数の

}