도전

x여기에 정수 입력 이 주어지면 합이 주어지면 1 <= x <= 2552의 거듭 제곱의 결과를 반환하십시오 x.

예

주어진 입력 :

86

프로그램은 다음을 출력해야합니다 :

64 16 4 2

입력:

240

산출:

128 64 32 16

입력:

1

산출:

1

입력:

64

산출:

64

합계에 특정 2의 거듭 제곱이 없으면 출력에 0이 포함될 수 있습니다.

예를 들어 input 65이 출력 될 수 있습니다 0 64 0 0 0 0 0 1.

채점

이것은 code-golf 이므로 각 언어에서 가장 짧은 답변이 이깁니다.

자바 스크립트 (ES6), 28 바이트

f=n=>n?[...f(n&~-n),n&-n]:[]

온라인으로 사용해보십시오!

순수한 배쉬 , 20

echo $[2**{7..0}&$1]

온라인으로 사용해보십시오!

설명

          {7..0}     # Brace expansion: 7 6 5 4 3 2 1 0
       2**{7..0}     # Brace expansion: 128 64 32 16 8 4 2 1
       2**{7..0}&$1  # Brace expansion: 128&n 64&n 32&n 16&n 8&n 4&n 2&n 1&n (Bitwise AND)
     $[2**{7..0}&$1] # Arithmetic expansion
echo $[2**{7..0}&$1] # and output

젤리 , 4 바이트

사용하지 않는 2의 힘 대신에 0을 출력 할 수 있기 때문에 -2 :)

Ḷ2*&

온라인으로 사용해보십시오!

방법?

Ḷ2*& - Link: integer, n         e.g. 10
Ḷ    - lowered range of n            [  0,  1,  2,  3,  4,  5,  6,  7,  8,  9]
 2*  - two to the power of           [  1,  2,  4,  8, 16, 32, 64,128,256,512]
   & - bit-wise and                  [  0,  2,  0,  8,  0,  0,  0,  0,  0,  0]

젤리 , 6 바이트

BUT’2*

온라인으로 사용해보십시오!

설명

그러나 여기에 설명이 있습니다 (참고 : 우리는 2 자체의 힘만 출력하고 다른 것은 출력 할 수 없다고 가정했습니다).

BUT’2* – Monadic link. Takes a number N as input. Example: 86
B      – Convert N to binary.                              [1, 0, 1, 0, 1, 1, 0]
 U     – Reverse.                                          [0, 1, 1, 0, 1, 0, 1]
  T    – Truthy indices.                                   [2, 3, 5, 7]
   ’   – Decrement.                                        [1, 2, 4, 6]
    2* – Raise 2 to that power.                            [2, 4, 16, 64]

제대로 작동하는지 "증명"하십시오. 밑이 2 인 정수 의 표준 표현은 . 여기서 과 같이 : 과 같은 지수 는 분명히 기여하지 않으므로 우리는 단지 관심이 있습니다 과 같은 것을 찾으십시오 . 에서 를 빼는 것이 편리하지 않기 때문에 (2의 거듭 제곱은 모두 형식의 지수를 갖습니다 . 여기서 는 인덱스입니다.$X$$\{x_1, x_2, x_3,\cdots, x_n\}$$x_i\in\{0,1\},\:\forall\:\: i\in\overline{1,n}$

파이썬 , 35 바이트

lambda n:[n&2**i for i in range(8)]

미사용 2의 제로를 가진 리틀 엔디안

온라인으로 사용해보십시오!

APL (Dyalog Extended) , 7 바이트 ^SBCS

익명의 암묵적 접두사 기능. 0 기반 인덱싱 ( ⎕IO←0)이 필요합니다 .

2*⍸⍢⌽⍤⊤

온라인으로 사용해보십시오!

2 두 가지
* 의 제곱 ɩ의 진정한 ndices  하면서  반전  의  이진 표현
⍸
⍢
⌽
⍤
⊤

슬레지 해머 0.2, 3 바이트

⡔⡸⢣

로 압축 해제합니다 {intLiteral[2],call[NumberExpand,2]}.

Sledgehammer는 점자를 코드 페이지로 사용하는 Wolfram 언어 코드의 압축기입니다. 위의 실제 크기는 2.75 바이트이지만 메타의 현재 규칙으로 인해 가장 가까운 바이트로 채워지는 코드 크기로 계산됩니다.

05AB1E , 3 바이트

Ýo&

@JonathanAllan 의 젤리 답변 포트 , 그래서 그를 투표해야합니다!

0을 포함합니다 (-loads of- trailing 0).

온라인으로 시도 하거나 모든 테스트 사례를 확인하십시오 .

설명:

Ý      # Create a list in the range [0, (implicit) input]
       #  i.e. 15 → [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
       #  i.e. 16 → [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16]
 o     # Take 2 to the power of each value
       #  → [1,2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768]
       #  → [1,2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768,65536]
  &    # Bitwise-AND each value with the (implicit) input
       # 15 → [1,2,4,8,0,0,0,0,0,0,0,0,0,0,0,0]
       # 16 → [0,0,0,0,16,0,0,0,0,0,0,0,0,0,0,0,0]
       # (and output the result implicitly)

가톨릭 , 3 바이트

ṫĊŻ

온라인으로 사용해보십시오!

설명:

ṫ       Decompose         into the largest values where:
 Ċ               the input
  Ż       the bit count is truthy (equal to one)

Wolfram Language (Mathematica) , 17 바이트

#~NumberExpand~2&

온라인으로 사용해보십시오!

Mathematica가 다시 파업합니다.

R , 27 23 바이트

bitwAnd(scan(),2^(7:0))

온라인으로 사용해보십시오!

풀린 코드 및 설명 :

A = scan()         # get input number A from stdin
                   # e.g. A = 65

bitwAnd( A , 2^(7:0))  # bitwise AND between all powers of 2 : 2^7 ... 2^0 and A
                       # and implicitly print the result
                       # e.g. B = bitwAnd(65, c(128,64,32,16,8,4,2,1)) = c(0,64,0,0,0,0,0,1)

• @Kirill L 덕분에 4 바이트

C # (Visual C # 대화식 컴파일러) , 29 바이트

인쇄 할 수없는 문자 5 개가 들어 있습니다.

n=>"€@ ".Select(a=>a&n)

설명

//Lambda taking one parameter 'n'
n=>
//String with ASCII characters 128, 64, 32, 16, 8, 4, 2, and 1
"€@ "
//Iterate through all the chars of the above string and transform them to
.Select(a=>
//A bitwise AND operation between the integer value of the current char and the input value
a&n)

온라인으로 사용해보십시오!

C # (Visual C # 대화식 컴파일러) , 38 바이트

x=>{for(int y=8;y-->0;Print(x&1<<y));}

온라인으로 사용해보십시오!

C (gcc) , 39 바이트

f(n){for(;n;n&=n-1)printf("%d ",n&-n);}

온라인으로 사용해보십시오!

05AB1E, 7 바이트

2вRƶ<oò

설명:

2в        convert input to binary array
R         reverse array
ƶ<        multiply each item by it's index and subtract 1
oò        2^item then round down

온라인으로 사용해보십시오!

하스켈 , 29 바이트

(mapM(\n->[0,2^n])[7,6..0]!!)

온라인으로 사용해보십시오!

루비 , 25 바이트

->n{8.times{|i|p n&2**i}}

온라인으로 사용해보십시오!

C (연타) , 133 (110) 63 58 바이트

@ceilingcat 덕분에 58 바이트 솔루션 .

x=256;main(y){for(scanf("%d",&y);x/=2;)printf("%d ",y&x);}

온라인으로 사용해보십시오!

MATL , 5 바이트

BPfqW

온라인으로 사용해보십시오!

설명

86예를 들어 입력 을 고려하십시오 .

B    % Implicit input. Convert to binary (highest to lowest digits)
     % STACK: [1 0 1 0 1 1 0]
P    % Flip
     % STACK: [0 1 1 0 1 0 1]
f    % Find: indices of nonzeros (1-based)
     % STACK: [2 3 5 7]
q    % Subtract 1, element-wise
     % STACK: [1 2 4 6]
W    % Exponential with base 2, element-wise. Implicit display
     % STACK: [2 4 16 64]

펄 6 , 16 12 바이트

Jonathan Allan 덕분에 -4 바이트

*+&2**all ^8

온라인으로 사용해보십시오!

8 개의 요소가있는 모든 접합을 반환합니다. 이것은 표준이 아닌 리턴 방식이지만, 일반적으로 Junction은 (적어도 자동 스레딩이 구현 될 때까지) 순서대로 작동 할 수 있으며 값을 추출 할 수 있습니다.

설명:

*+&              # Bitwise AND the input with
   2**           # 2 raised to the power of
      all ^8     # All of the range 0 to 7

apt, 8 5 바이트

Æ&2pX

시도 해봐

Æ&2pX     :Implicit input of integer U
Æ         :Map each X in the range [0,U)
 &        :  Bitwise AND of U with
  2pX     :  2 to the power of X

대안

Oliver 가 플래그를 0사용하여 출력 에서 s 를 피하도록 제안합니다 -mf.

N&2pU

시도 해봐

N&2pU     :Implicitly map each U in the range [0,input)
N         :The (singleton) array of inputs
 &        :Bitwise AND with
  2pX     :2 to the power of U
          :Implicitly filter and output

05AB1E , 9 바이트

Ýoʒ›}æʒOQ

온라인으로 사용해보십시오!

이것은 6 바이트에도 맞지만 TIO에서 86 시간 동안 완료되지는 않습니다.

05AB1E , 6 바이트

ÝoæʒOQ

온라인으로 사용해보십시오!

Julia 0.6 , 13 바이트

n->n&2.^(0:7)

온라인으로 사용해보십시오!

CJam , 12 바이트

{:T{2\#T&}%}

온라인으로 사용해보십시오!

K (oK) , 19 16 바이트

ngn 덕분에 -3 바이트!

{*/x#2}'&|(8#2)\

온라인으로 사용해보십시오!

oK에는 power연산자 가 없기 때문에 도우미 기능이 필요합니다 {*/x#2}(복사하여 2 x번 복사 하고 결과 목록을 줄입니다)

연금술사 , 125 바이트

_->In_x+128a+m
m+x+a->m+b
m+0x+a->n+a
m+0a->o+Out_b+Out_" "
n+b->n+x+c
n+0b+a->n+c
n+0a->p
o+b->o+c
o+0b->p
p+2c->p+a
p+0c->m

온라인으로 사용해보십시오! 또는 모든 입력을 테스트하십시오!

설명

_->In_x+128a+m           # Initialize universe with input, 128a (value to compare to) and m (state)
m+x+a->m+b               # If c has been halved, subtract min(a, x) from a and x and put its value into b
m+0x+a->n+a              # If x < a, continue to state n
m+0a->o+Out_b+Out_" "    # Else print and continue to state o
n+b->n+x+c               # Add min(a, x) (i.e. x) back to x, and add it to c (we're collecting a back into c)
n+0b+a->n+c              # Then, add the rest of a to c
n+0a->p                  # Then, go to state p
o+b->o+c                 # Add min(a, x) (i.e. a) to c - x _is_ greater than a and so contains it in its binary representation, so we're not adding back to x
o+0b->p                  # Then, go to state p
p+2c->p+a                # Halve c into a
p+0c->m                  # Then go to state m

PHP ,41 39 바이트

for($c=256;$c>>=1;)echo$argv[1]&$c,' ';

온라인으로 사용해보십시오!

또는 재미있는 연산자와 PHP 5.6 이상이 없는 38>>= :

for($x=8;$x--;)echo$argv[1]&2**$x,' ';

또는 리틀 엔디안 ( "0 4 0 16 0 64 0") 출력의 36 :

while($x<8)echo$argv[1]&2**$x++,' ';

실제로 나는 단지 >>=연산자 를 사용하고 싶었 으므로 39를 고수하고 있습니다.

테스트 :

$php pow2.php 86
0 64 0 16 0 4 2 0

$php pow2.php 240
128 64 32 16 0 0 0 0

$php pow2.php 1
0 0 0 0 0 0 0 1

$php pow2.php 64
0 64 0 0 0 0 0 0

$php pow2.php 65
0 64 0 0 0 0 0 1

TSQL, 43 39 바이트

더 짧은 멋진 솔루션을 찾을 수 없으므로 표준 루프가 있습니다. MickyT 및 KirillL 덕분에 -4 바이트

DECLARE @y int=255

,@ int=128s:PRINT @y&@ SET @/=2IF @>0GOTO s

사용해보십시오

파이썬 2 , 43 40 바이트

f=lambda n,p=1:n/p*[1]and f(n,p*2)+[p&n]

온라인으로 사용해보십시오!

C # (Visual C # 대화식 컴파일러), 33 바이트

n=>{for(;n>0;n&=n-1)Print(n&-n);}

@Arnauld 의 JavaScript (ES6) 응답 포트이므로 그를 찬성 해야합니다.

온라인으로 사용해보십시오.

설명:

n=>{            // Method with integer parameter and no return-type
  for(;n>0      //  Continue looping as long as `n` is larger than 0:
      ;         //    After every iteration:
       n&=n-1)  //     Bitwise-AND `n` by `n-1`
    Print(      //   Print with trailing newline:
      n&-n);}   //    `n` bitwise-AND `-n`