次のような非負の整数のみを含む空でないリスト/配列がある場合：

[0, 0, 0, 8, 1, 4, 3, 5, 6, 4, 1, 2, 0, 0, 0, 0]

末尾のゼロと先頭のゼロを削除してリストを出力します。

この出力は次のようになります。

[8, 1, 4, 3, 5, 6, 4, 1, 2]

他のいくつかのテストケース：

[0, 4, 1, 2, 0, 1, 2, 4, 0] > [4, 1, 2, 0, 1, 2, 4]
[0, 0, 0, 0, 0, 0] > nothing
[3, 4, 5, 0, 0] > [3, 4, 5]
[6] > [6]

最短のコードが勝つ

ゼリー、2バイト

コード：

t0

説明：

t   # Trim off...
 0  #  zero at both sides

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

JavaScript（ES6）43

a=>(f=a=>a.reverse().filter(x=>a|=x))(f(a))

少ないゴルフ

a=>{
  f=a=>a.reverse().filter(x=>a|=x) // reverse and remove leading 0
  // leverage js cast rules: operator | cast operands to integer
  // an array casted to integer is 0 unless the array is made of
  // a single integer value (that is ok for me in this case)
  return f(f(a)) // apply 2 times
}

テスト

F=a=>(f=a=>a.reverse().filter(x=>a|=x))(f(a))

function test(){
  var l=(I.value.match(/\d+/g)||[]).map(x=>+x)
  O.textContent=F(l)
}

test()

#I { width:90%}

<input id=I oninput='test()' value='0 0 1 3 7 11 0 8 23 0 0 0'>
<pre id=O></pre>

CJam、13バイト

l~{_{}#>W%}2*

入力された配列で。

長いバージョン：

l~             Puts input on the stack and parse as array
  {       }    Code block
   _           Duplicate the first thing on the stack
    {}#        Finds the index of the first non-0 value in the array, puts it on the stack
       >       Slices the array from that index
        W%     Reverses the array
           2*  Does the code block twice in total

Pyth、4バイト

.sQ0

デモ：

llama@llama:~$ pyth -c .sQ0
[0, 0, 0, 1, 2, 0, 3, 4, 0, 0, 5, 0, 0, 0, 0]
[1, 2, 0, 3, 4, 0, 0, 5]

Pyth'srev-doc.txtから：

.s <seq> <any>
    Strip from A maximal prefix and suffix of A consisting of copies of B.

05AB1E、4バイト

コード：

0Û0Ü

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

説明：

0Û    # Trim off leading zeroes
  0Ü  # Trim off trailing zeroes

CP-1252エンコードを使用します。

網膜、12バイト

^0 ?

)` 0$

後続の改行は重要です。

数バイトを節約してくれた@MartinBüttnerと@FryAmTheEggmanに感謝します。

オンラインで試す

R、43バイト

function(x)x[cummax(x)&rev(cummax(rev(x)))]

または読み取り/書き込みSTDIN / STDOUTとして

x=scan();cat(x[cummax(x)&rev(cummax(rev(x)))])

これは、最初と最後の（逆の）文字列から累積最大値を見つけます。&オペレータは、同じサイズの論理1にこれら二つのベクトルを変換しx、（ゼロが常にに変換されますFALSEし、他のすべてにTRUE）、それからサブセットすることが可能となり、このようx出会った条件に従って。

Haskell、29バイト

t=f.f;f=reverse.dropWhile(<1)

Mathematica 34 27バイト

#//.{0,a___}|{a___,0}:>{a}&

これにより、そのようなアクションが新しい出力の提供に失敗するまで、置換ルールが繰り返し適用されます。Alephalphaのおかげで7バイト節約されました。

最初のルールは、先頭のゼロを削除します。2番目のルールは、配列の最後のゼロを削除します。

05AB1E、4バイト

0Û0Ü

基本的に、入力の先頭と末尾のゼロをトリミングし、配列として指定します。

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

Perl、19 + 1 = 20バイト

s/^(0 ?)+|( 0)+$//g

-pフラグが必要：

$ perl -pE's/^(0 )+|( 0)+$//g' <<< '0 0 0 1 2 3 4 5 6 0 0 0'
1 2 3 4 5 6

ゼリー、10バイト

Uo\U,o\PTị

これは組み込みを使用しません。

Uo\U            Backward running logical OR
    ,           paired with
     o\         Forward running logical OR
       P        Product
        T       All indices of truthy elements
         ị      Index the input at those values.

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

Perl、38バイト

$\.=$_}{$\=~s/^(0\n)*|(0\n)*\n$//gs

で実行しperl -pます（に3バイト追加-p）。

STDINの番号を1行に1つずつ受け入れます。正常に動作するUNIXユーティリティが必要とするように、STDOUTに1行に1つずつ数値を出力します。

「0」で正確に表される数値のみをゼロとして扱います。正規表現でさらに数バイトを使用して、他の表現をサポートすることも可能です。

より長いバージョン、まだで実行される-p：

    # append entire line to output record separator
    $\.=$_
}{
    # replace leading and trailng zeroes in output record separator
    $\ =~ s/^(0\n)*|(0\n)*\n$//gs
    # output record separator will be implicitly printed

-pフラグとの相互作用を示す拡張バージョン：

# implicit while loop added by -p
while (<>) {
    # append line to output record separator
    $\.=$_
}{ # escape the implicit while loop
    # replace leading and traling 
    $\=~s/^(0\n)*|(0\n)*\n$//gs
    # print by default prints $_ followed by
    # the output record separator $\ which contains our answer
    ;print # implicit print added by -p
} # implicit closing brace added by -p

Elixir、77バイト

import Enum
z=fn x->x==0 end
reverse(drop_while(reverse(drop_while(l,z)),z))

lは配列です。

編集：わ！コピー/パスタは失敗します。もちろん、Enumをインポートする必要があります。これにより、バイトカウントが12増加します（または、Enum.function_nameを使用すると、さらに長くなります）。

Vitsy、13バイト

Vitsyは徐々に良くなっています...（私はあなたのためにゼリーに来ています。._ಠ）

1mr1m
D)[X1m]

これは、スタック上の配列で終了します。読みやすくするために、TryItOnline！説明の下に提供したリンクは、フォーマットされたリストを出力します。

説明：

1mr1m
1m      Do the second line of code.
  r     Reverse the stack.
   1m   I'ma let you figure this one out. ;)

D)[X1m]
D       Duplicate the top item of the stack.
 )[   ] If the top item of the stack is zero, do the stuff in brackets.
   X    Remove the top item of the stack.
    1m  Execute the second line of code.

これにより、不当に大きな入力に対してStackOverflowExceptionがスローされることに注意してください。

TryItOnline！

R、39バイト

function(x)x[min(i<-which(x>0)):max(i)]

David ArenburgのR回答より4バイト短い。この実装は、配列内でゼロより大きい最初と最後のインデックスを見つけ、それらの2つのインデックス間の配列内のすべてを返します。

MATL、9バイト

2:"PtYsg)

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

説明

2:"     % For loop (do the following twice)
  P     %   Flip array. Implicitly asks for input the first time
  t     %   Duplicate
  Ys    %   Cumulative sum
  g     %   Convert to logical index
  )     %   Apply index
        % Implicitly end for
        % Implicitly display stack contents

Dyalog APL、15バイト

{⌽⍵↓⍨+/0=+\⍵}⍣2

               ⍣2     Apply this function twice:
{             }       Monadic function:
           +\⍵        Calculate the running sum.
       +/0=           Compare to zero and sum. Number of leading zeroes.
   ⍵↓⍨               Drop the first that many elements from the array.
 ⌽                   Reverse the result.

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

ルビー、49 44バイト

->a{eval ?a+'.drop_while{|i|i<1}.reverse'*2}

マナトワークのおかげでまったく異なる方法で5バイトてにます！

これdropは配列の最初の要素であるwhile0であり、配列を反転し、繰り返し、最後に配列を反転して適切な順序に戻します。

Vim 16キーストローク

i<input><esc>?[1-9]<enter>lD0d/<up><enter>

入力はとの間iでユーザーによって入力さescれ、キーストロークとしてカウントされません。これは、少なくとも1つの先行ゼロと1つの後続ゼロがあることを前提としています。それが有効な仮定でない場合、この少し長いバージョンを使用できます：（18キーストローク）

i <input> <esc>?[1-9]<enter>lD0d/<up><enter>

ES6、51バイト

f=a=>a.map(x=>x?t=++i:f<i++||++f,f=i=0)&&a.slice(f,t)

tは、最後のゼロ以外の値の後のインデックスに設定されますが、fこれまでにゼロのみが表示されている限り増分されます。

Perl 6、23バイト

{.[.grep(?*):k.minmax]}
{.[minmax .grep(?*):k]}

使用法：

# replace the built-in trim subroutine
# with this one in the current lexical scope
my &trim = {.[.grep(?*):k.minmax]}

say trim [0, 0, 0, 8, 1, 4, 3, 5, 6, 4, 1, 2, 0, 0, 0, 0];
# (8 1 4 3 5 6 4 1 2)
say trim [0, 4, 1, 2, 0, 1, 2, 4, 0];
# (4 1 2 0 1 2 4)
say trim [0, 0, 0, 0, 0, 0];
# ()
say trim [3, 4, 5, 0, 0];
# (3 4 5)
say trim [6];
# (6)

網膜、11バイト

+`^0 ?| 0$
<empty>

とても簡単です。行の先頭と末尾のゼロを再帰的に置き換えます。

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

JavaScript（ES6）、47バイト

a=>a.join(a="").replace(/(^0+|0+$)/g,a).split(a)

a配列はどこにありますか。

Python、84文字

def t(A):
 if set(A)<={0}:return[]
 for i in(0,-1):
  while A[i]==0:del A[i]
 return A

JavaScript（ES6）、34バイト

a=>a.replace(/^(0 ?)*|( 0)*$/g,'')

入力と出力は、などのスペース区切りリストの形式です"0 4 1 2 0 1 2 4 0"。

Javascript（ES6）40バイト

a=>/^(0,)*(.*?)(,0)*$/.exec(a.join())[2]

PHP、56 54 52バイト

Windows-1252エンコードを使用

文字列ベースのソリューション

<?=preg_replace(~ÜÒ×ßÏÖÔƒ×ßÏÖÔÛÜ,"",join($argv,~ß));

次のように実行します：

echo '<?=preg_replace(~ÜÒ×ßÏÖÔƒ×ßÏÖÔÛÜ,"",join($argv,~ß));' | php -- 0 0 123 234 0 500 0 0 2>/dev/null;echo

端末がUTF-8に設定されている場合、これは同じです。

echo '<?=preg_replace("#-( 0)+|( 0)+$#","",join($argv," "));' | php -- 0 0 123 234 0 500 0 0 2>/dev/null;echo

微調整

• 文字列を無効にし、文字列区切り文字を削除して、2バイトを節約しました
• 短い印刷タグを使用して2バイトを保存

Python 2、69 67バイト

def f(a):
 for i in(0,-1):
  while a and a[i]==0:a.pop(i)
 return a

PowerShell、49バイト

($args[0]-join',').trim(',0').trim('0,')-split','

入力$args[0]を取得し、-joinそれらをコンマと一緒に使用して文字列を形成します。次に、.Trim()2回呼び出される関数を使用して、最初に末尾のゼロとコンマを削除します。次に-split、コンマ上の文字列を配列に戻します。

変換PowerShell を使用しない代替バージョン、
81バイト

function f{param($a)$a=$a|%{if($_-or$b){$b=1;$_}};$a[$a.Count..0]}
f(f($args[0]))

PowerShellには配列をトリミングする関数がないfため、この半分を処理する新しい関数を定義します。関数は$a入力として受け取り、foreach loopで各アイテムをループします|%{...}。繰り返しごとに、の条件をチェックします$_ -or $b。ゼロ以外の整数は真実である$nullが偽であるため（および$b、以前に定義されていないため、として開始します$null）、これは$true配列内の最初のゼロ以外の要素にヒットすると評価されます。次に$b=1、現在の値$_を設定してパイプラインに追加します。その後、入力配列の最後まで続きます。中央にゼロがあり、出力に最後が追加されます。$bます。真実です。

ループの結果をカプセル化し、すべて保存します$a。次に、$a逆の順序でインデックスを作成します（つまり、配列を逆にします）。これはパイプライン上に残されるため、関数の戻り値になります。

$args[0]プログラムの入力で関数を2回呼び出して、正面から「トリム」し、次に正面（逆にしたので背面）を再度トリムします。2回反転するため、順序は保持されます。

このバージョンは、すべてゼロの入力配列の規則で少し緩い動作をしますが、STDERRを無視することは慣習として受け入れられているため、プログラムは_{（PowerShellの同等の）} STDERRに2つの（詳細な）Cannot index into a null arrayエラーを吐き出し、何も出力しません。