これがこのサイトでの私の最初の挑戦です。

課題は、正の入力整数$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テスト。

@lirtosiastに3バイトをありがとう。

どうやって：

⍳*⊢-⍳ ⍝ 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),...]

Haskell、23バイト

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

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

代替バージョン、23バイト：

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

Japt、5バイト

õ_p´U

それを試してみてください

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

Perl 6、19バイト

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

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

数字を受け取ってリストを返す匿名コードブロック。Zip指数範囲1 to inputと範囲input-1 to 0

アヒーウイ（エソトープ）、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言語（Mathematica）、24 20 18バイト

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

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

-4ありがとう@lirtosiast。

MathGolf、6バイト

rx\╒m#

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

Python 2、40バイト

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

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

Python 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³を計算するRetina置換式です。各文字列は、独自の行に出力されます。

%~`^
.+¶

前のステージで生成された各行について、行に接頭辞.+を付けて置換ステージに変換し、そのステージを評価して式を計算します。

QBasic、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 Core）、42バイト

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

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

JavaScript（Node.js）、33 32バイト

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

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

@Shaggyへのクレジットで-3バイト、@ l4m2で-1バイト！

JavaScript（Node.js）、36バイト

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

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

JavaScript（Node.js）、37バイト

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

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

C＃（Visual C＃Interactive Compiler）、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]

Java、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のJelly回答のポート。

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

説明：

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]

Lua、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)

かなり自明です。そのノート:オペレータがより高い優先湯順位である-ように、オペレータ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＃Interactive Compiler）、55バイト

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

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

Perl 5、21 -nバイト

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

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