이것이이 사이트의 첫 번째 도전입니다.

문제는 양 의 입력 정수 을 가져 와서 오름차순으로 ( 을 포함하여 ~ n ) (여기서 는 현재 정수임)으로 인쇄하는 것입니다. $n$$1$$n$$i^{(n-i)}$$i$

예

입력 5가 주어지면 프로그램은 다음을 인쇄합니다.

1  
8  
9  
4  
1  

$1^4$ 는 1이고 은 8이고 는 9이고 은 4이고 은 1이며$1+4=5$
$2^3$$2+3=5$
$3^2$$3+2=5$
$4^1$$4+1=5$
$5^0$$5+0=5$

입력과 출력

입력은 양의 정수 형태입니다. 출력은 쉼표 또는 줄 바꿈으로 구분 된 숫자 목록입니다.

이것은 code-golf 이므로 가장 짧은 코드가 승리합니다.

APL (Dyalog Unicode) , 8 5 바이트

⍳*⊢-⍳

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

익명 접두사 암묵적 기능. 범위 [1..10]에 대한 TIO 테스트.

3 바이트에 대한 @lirtosiast 감사합니다.

방법:

⍳*⊢-⍳ ⍝ Tacit function
    ⍳ ⍝ Range. ⍳n generates the vector [1..n].
  ⊢- ⍝ Subtracted from the argument. The vector is now [n-1,n-2,...,0]
⍳*    ⍝ Exponentiate using the range [1..n] as base. The result is the vector
      ⍝ [1^(n-1), 2^(n-2), 3^(n-3),...]

하스켈, 23 바이트

f i=[x^(i-x)|x<-[1..i]]

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

대체 버전, 23 바이트 :

f i=(^)<*>(i-)<$>[1..i]

apt, 5 바이트

õ_p´U

시도 해봐

õ         :Range [1,input]
 _        :Map
  p       :  Raise to the power of
   ´U     :  Input decremented

펄 6 , 19 바이트

{^$_+1 Z**[R,] ^$_}

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

숫자를 받아서 목록을 반환하는 익명 코드 블록입니다. Zip은 범위 1 to input와 범위를 지수합니다input-1 to 0

Aheui (동위 원소) , 193 164 바이트 (56 자)

방빠싹받분샥퍼붇바파쟈뿌차샦히망맣여
타빠바푸투반또분뽀뿌서썪삯타삯받반타
석차샦져쌲볼어타토싻삭빠쏛ㅇ또섞썪뻐

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

AVIS ( 한국어 ) 에서 사용해보십시오 . 위의 코드를 복사하여 붙여 넣은 다음 시작 버튼을 누르고 숫자를 입력하고 어떻게 움직이는 지 확인하십시오. 출력을 보려면 왼쪽 의 > _ 아이콘을 누르십시오 .

많이 골프는 아니지만 나는 그것을 쐈다.

Pyth , 5 바이트

_m^-Q

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

최적으로 인코딩 된 값은 4.106 바이트입니다.

_                reverse of the following list:
 m               map the following lambda d:
  ^                (N-d)**d
   -Qd             
      d
       Q         over [0,...,N-1]

J , 10 바이트

(>:^|.)@i.

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

실제로 줄 바꿈으로 숫자를 구분해야하는 경우 :

J , 13 바이트

,.@(>:^|.)@i.

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

젤리 , 5 바이트

R*ḶU$

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

R                [1,...,n]
 *               to the power of
  ḶU$            [0,...,n-1] reversed

PHP, 32 바이트

while($argn)echo++$i**--$argn,_;

파이프로 실행 -nR하거나 온라인으로 사용해보십시오 .

옥타브 , 18 바이트

@(n)(t=1:n).^(n-t)

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

감사합니다 Luis Mendo , 내부 변수를 사용하면 3 바이트가 절약됩니다.

젤리 , 4 바이트

*ạ¥€

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

Wolfram Language (Mathematica) , 24 20 18 바이트

(x=Range@#)^(#-x)&

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

-4 감사합니다 @lirtosiast.

MathGolf , 6 바이트

rx\╒m#

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

파이썬 2 , 40 바이트

lambda n:[i**(n-i)for i in range(1,n+1)]   #Outputs a list

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

파이썬 2 , 41 바이트

n,i=input(),0
exec"print(n-i)**i;i+=1;"*n   #Prints in reversed order

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

루비 , 27 바이트

->n{(1..n).map{|r|r**n-=1}}

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

망막 , 35 바이트

.+
*
_
$$.($.'*$($.>`$*)_¶
%~`^
.+¶

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

.+
*

입력을 단항으로 변환하십시오.

_

각 위치를 일치시킵니다. 그런 다음 여러 대체 변수를 설정합니다. $`경기의 왼쪽이된다; $>`이것을 왼쪽과 일치하도록 수정합니다. $.>`길이, 즉 현재 색인을 가져 오도록이를 수정합니다. $'반면에 일치하는 권리 $.'는 길이, 즉 현재 지수입니다.

$$.($.'*$($.>`$*)_¶

캐릭터 생성 $.(플러스 $.'의 반복을 $.>`*플러스 _. 예를 들어, 원래 입력 5에서 인덱스 2의 경우 $.'3 $.>`은 2 이고 결과 문자열은 $.(2*2*2*_입니다. 이것은 편리하게 2³를 caluclate하는 Retina 대체 표현입니다. 각 문자열은 자체 줄에 출력됩니다.

%~`^
.+¶

이전 단계에서 생성 된 각 줄에 대해 줄 앞에 접두사를 붙여서 .+대체 단계로 바꾸고 해당 단계를 평가하여 식을 계산합니다.

Q 기본, 35 33 바이트

@Neil에게 2 바이트 감사합니다!

INPUT a
FOR b=1TO a
?b^(a-b)
NEXT

인터프리터가 전적으로 사양 에 맞지 않기 때문에 REPL.IT 에서 약간 확장 된 버전입니다 .

산출

QBasic (qb.js)
Copyright (c) 2010 Steve Hanov

   5
1
8
9
4
1

F # (. NET 코어) , 42 바이트

let f x=Seq.map(fun y->pown y (x-y))[1..x]

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

자바 스크립트 (Node.js) , 33 32 바이트

n=>(g=i=>--n?++i**n+[,g(i)]:1)``

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

@Shaggy에 크레딧이있는 -3 바이트 및 @ l4m2에 의해 -1 바이트!

자바 스크립트 (Node.js) , 36 바이트

f=(n,i=1)=>n--?[i++**n,...f(n,i)]:[]

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

자바 스크립트 (Node.js) , 37 바이트

n=>[...Array(n)].map(x=>++i**--n,i=0)

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

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

x=>new int[x].Select((_,i)=>Math.Pow(i+1,--x))

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

MATL , 5 바이트

:Gy-^

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

설명

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

:     % Implicit input. Range
      % STACK: [1 2 3 4 5]
G     % Push input again
      % STACK: [1 2 3 4 5], 5
y     % Duplicate from below
      % STACK: [1 2 3 4 5], 5, [1 2 3 4 5]
-     % Subtract, element-wise
      % STACK: [1 2 3 4 5], [4 3 2 1 0]
^     % Power, element-wise. Implicit display
      % STACK: [1 8 9 4 1]

자바, 59 바이트

for(int i=1;a+1>i;i++)System.out.println(Math.pow(i,a-i));

클린 , 37 바이트

import StdEnv
$n=[i^(n-i)\\i<-[1..n]]

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

$ :: Int -> [Int]정수를 취하고 결과 목록을 반환하도록 정의합니다 .

$ n                // function $ of n
 = [i ^ (n-i)      // i to the power of n minus i
    \\ i <- [1..n] // for each i in 1 to n
   ]

R , 34 바이트

x=1:scan();cat(x^rev(x-1),sep=',')

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

05AB1E , 5 바이트

LD<Rm

@lirtosiast 의 젤리 답변 포트 .

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

설명:

L      # List in the range [1, (implicit) input integer]
       #  i.e. 5 → [1,2,3,4,5]
 D<    # Duplicate this list, and subtract 1 to make the range [0, input)
       #  i.e. [1,2,3,4,5] → [0,1,2,3,4]
   R   # Reverse it to make the range (input, 0]
       #  i.e. [0,1,2,3,4] → [4,3,2,1,0]
    m  # Take the power of the numbers in the lists (at the same indices)
       # (and output implicitly)
       #  i.e. [1,2,3,4,5] and [4,3,2,1,0] → [1,8,9,4,1]

루아 , 43 41 바이트

@Shaggy 덕분에 -2 바이트

s=io.read()for i=1,s do print(i^(s-i))end

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

R, 22 바이트

n=scan();(1:n)^(n:1-1)

공정한 자기 설명; 있습니다 :운영자가보다 높은 precendence이다 -그 때문에 운전자가 n:1-1보다 짧은(n-1):0

0에서 시작할 수 있으면 (0:n)^(n:0)-1이 필요하지 않으므로 2 바이트를 잃을 수 있습니다 .

숯 , 9 바이트

Ｉ⮌ＥＮＸ⁻θιι

온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 설명:

   Ｎ        Input as a number
  Ｅ         Map over implicit range
       ι    Current value
     ⁻      Subtracted from
      θ     First input
    Ｘ       Raised to power
        ι   Current value
 ⮌          Reverse list
Ｉ           Cast to string
             Implicitly print on separate lines

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

v=>Enumerable.Range(0,v--).Select(i=>Math.Pow(i+1,v--))

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

펄 5 -n , 21 바이트

say++$\**--$_ while$_

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