2021年2月

Stream.repeatedly(fn -&gt; Enum.random([&quot;ズン&quot;, &quot;ドコ&quot;]) end) |&gt; Enum.reduce_while( [], fn x, acc -&gt; acc |&gt; (&amp;(List.starts_with?(&amp;1, [&quot;ドコ&quot;, &quot;ズン&quot;, &quot;ズン&quot;, &quot;ズン&quot;, &quot;ズン&quot;]) &amp;&amp; !List.starts_with?(&amp;1, [&quot;ドコ&quot;, &quot;ズン&quot;, &quot;ズン&quot;, &quot;ズン&quot;, &quot;ズン&quot;, &quot;ズン&quot;]))).() |&gt; if(do: {:halt, [&quot;キ・ヨ・シ！&quot; | acc]}, else: {:cont, [x | acc]}) end) |&gt; Enum.reverse |&gt; Enum.each(fn x -&gt; IO.puts x end) https://scrapbox.io/Geek-SpaceBox/ズンドコ問題 こちらに準拠して、ズン ズン ズン ズン ズン ドコを不正としました。 repeatedlyがきれいですね。あとList.ends_with?がなかったので仕方なくstarts_with?を使いました。リストは先頭への追加が高速なのでしかたないですね.

Elixirのワンライナーでズンドコキヨシ