タスク-タイトルはほぼそれを要約しています。整数xをxの累乗にし0<xます。

制限事項：

• 累乗の使用、exp()、ln()、およびその他の権限に関連する言語組み込み関数は、のようなpow()、x^x、x**x禁止されています。
• 指定された整数が、選択したプログラミング言語の制限に適合すると仮定できます。

テストケース：

Input | Output
---------------
2     | 4
3     | 27
5     | 3125
6     | 46656
10    | 10000000000

これはcode-golfであるため、バイト単位の最短プログラムが優先されます。

APL（Dyalog）、4バイト

以下のためのx ^のx、取るのxを左引数としてX右引数として。

×/⍴⍨

すべてのケースをオンラインで試してください！

×/ の製品

⍴⍨ argはargをコピーします

そしてここに負の整数も処理するものがあります：

×/|⍴|*×

すべてのケースを試してください！

×/ の製品

| 絶対値

⍴ rの繰り返し

| 絶対値

* の力に

× サイン

組み込みのPowerプリミティブは次のとおりです。

x*y

Python、25バイト

lambda n:eval('1'+'*n'*n)

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

Mathematica、16バイト

このバイト数で2つのソリューションがあります。

1##&@@#~Table~#&

ここで、#~Table~#のnコピーのリストを作成しますn。次に、すべての引数を一緒に乗算するListヘッドが置き換えられ1##&ます。

Nest[n#&,1,n=#]&

これは、単純に入力を保存n乗算し、その後1でn、n回。

JavaScript（ES6）、33 28 25 24バイト

n=>g=(x=n)=>--x?n*g(x):n

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

f=
n=>g=(x=n)=>--x?n*g(x):n
o.innerText=f(i.value=3)()
i.oninput=_=>o.innerText=f(+i.value)()

<input id=i min=1 type=number><pre id=o>

歴史

25バイト

f=(n,x=n)=>--x?n*f(n,x):n

28バイト

n=>eval(1+("*"+n).repeat(n))

33バイト

n=>eval(Array(n).fill(n).join`*`)

純粋なbash、43

echo $[$1<2?1:$[$1<2?2:$1]#`printf 1%0$1d`]

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

これがルールを過度に曲げているかどうかはわかりません-リストされている禁止されているビルトインは使用していませんが、ベース変換を使用しています。

• printf 1%0$1d出力1nは、続いて0の
• $[b#a]a基数として扱う算術展開bであり、必要な結果が得られます。残念ながら、ベース<2は機能しないため、追加?:ビットは入力n = 1を処理します。

bashは符号付き64ビット整数（最大2 ³¹ -1）を使用するため、最大入力は15 です。

アリス、13バイト

/o
\i@/.&.t&*

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

説明

/o
\i@/...

これは、10進整数の読み取りと書き込みを行い、完全にCardinalモードで動作するプログラム（ほとんどの算術問題のプログラム）のフレームワークです。

.    Duplicate n.
&.   Make n copies of n.
t    Decrement the top copy to n-1.
&*   Multiply the top two values on the stack n-1 times, computing n^n.

標準ML、42バイト

fn x=>foldl op*1(List.tabulate(x,fn y=>x))

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

説明：

fn y => x                 (* An anonymous function that always returns the inputted value *)
List.tabulate(x, fn y=>x) (* Create a list of size x where each item is x *)
foldl op* 1               (* Compute the product of the entire list *)    

ゼリー、3 バイト

ẋ⁸P

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

どうやって？

ẋ⁸P - Main link: x             e.g. 4
 ⁸  - link's left argument, x       4
ẋ   - repeat left right times       [4,4,4,4]
  P - product                       256

Cubix、19バイト

..@OI:1*s;pu!vqW|($

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

ステップバイステップ

辺の長さが2の立方体に展開する

    . .
    @ O
I : 1 * s ; p u
! v q W | ( $ .
    . .
    . .

• I:1 入力を受け取り、複製して1をプッシュします。これにより、カウンター、乗算器、および結果を含むスタックが設定されます。
• *s; TOSを倍数にし、結果を以前のものと交換し、以前のものを削除します。
• puカウンターアイテムをTOSに持ち込みます。Uターン。これはレーンの変更でしたが、バイトを削る必要がありました。
• |($これは、バイトを節約するために行われました。ヒットすると、デクリメントがスキップされます。を反映し、カウンターをデクリメントし、キューブの周りの操作なしのラッピングをスキップします。
• !vqWカウンターをテストします。本当にリダイレクトがスキップされる場合、カウンターをBOSに置き、車線を乗数に戻します。それ以外の場合はリダイレクトします。
• |sO@これは、カウンターテストからリダイレクトされる終了シーケンスです。水平リフレクトを通過し、TOSをスワップして、結果をTOSに出力し、出力および停止します。

R、22バイト

xstdinから読み取ります。

prod(rep(x<-scan(),x))

のxコピーのリストを生成し、xそのリストの要素の積を計算します。の場合x=0、はをrep返しますnumeric(0)。これはlengthの数値ベクトルです0が、prodその値は1です。0^0=1このメソッドでは、Rの組み込み累乗法と一致するため、非常にきれいです。

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

Linux用のx86_64マシン言語、14 11 10バイト

0:   6a 01                   pushq  $0x1
2:   58                      pop    %rax
3:   89 f9                   mov    %edi,%ecx
5:   f7 ef                   imul   %edi
7:   e2 fc                   loop   5
9:   c3                      retq

するには、オンラインでそれを試してみてください！、次のCプログラムをコンパイルして実行します。

const char h[]="\x6a\1\x58\x89\xf9\xf7\xef\xe2\xfc\xc3";

int main(){
  for( int i = 1; i < 4; i++ ) {
    printf( "%d %d\n", i, ((int(*)())h)(i) );
  }
}

ルビー、20 18バイト

仕様が変更され、指数引数が不要になったため、-2バイト。

->x{eval [x]*x*?*}

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

積み上げ、10バイト

{!1[n*]n*}

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

同じサイズの2つの引数のべき乗：

{%1[x*]y*}

両方とも機能です。乗算する関数を繰り返します1によってn n回。

Scala、32 26バイト

n=>List.fill(n)(n).product

オンラインでお試しください！（n = 10でオーバーフローしないように、TIOでlongへの変換を追加しました。）

05AB1E、3バイト

.DP

オンラインでお試しください！またはすべての例を試す

.D  # pop a,b    push b copies of a 
    # 05AB1E implicitly takes from input if there aren't enough values on the stack
    # For input 5, this gives us the array: [5,5,5,5,5]
  P # Take the product of that array
    # Implicit print

Haskell、24 23 21バイト

f y=product$y<$[1..y]

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

• Laikoniのおかげで1バイト節約
• nimiのおかげで2バイト節約

Japt、4バイト

ÆUÃ×

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

説明

ÆUÃ×       // implicit: U = input integer
Uo{U} r*1  // ungolfed

Uo{ }      // create array [0, U) and map each value to...
   U       //   the input value
      r*1  // reduce with multiplication, starting at 1          
           // implicit output of result

x86マシンコード（Linux）、18バイト

31 c0 ff c0 31 db 39 df 74 07 0f af c7 ff c3 eb f5 c3

次のようなC宣言が必要です。 extern int XpowX(int)です。

分解

XpowX:
  # edi : input register
  # ebx : counter
  # eax : result register
  xor  %eax, %eax    # result  = 0
  inc  %eax          # result += 1
  xor  %ebx, %ebx    # counter = 0
  loop:
    cmp  %ebx, %edi  # if (counter == input)
    je   done        #   return result
    imul %edi, %eax  # result  *= input
    inc        %ebx  # counter += 1
    jmp   loop
  done:
    ret

Brachylog、6バイト

g;?j₎×

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

説明

          Example input: 5
g         Group: [5]
 ;?       Pair with the Input: [[5], 5]
   j₎     Juxtapose [5] 5 times: [5, 5, 5, 5, 5]
     ×    Multiply

CJam、7バイト

ri_a*:*

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

説明

ri       e# Read an int from input
  _      e# Duplicate it
   a*    e# Put the copy in the array and repeat it that many times
     :*  e# Take the product of the array

Perl 6、13バイト

{[*] $_ xx$_}

$_ xx $_（無名関数の引数である）の$_コピーのリストを評価し、そのリストを乗算で縮小します。$_$_[*]

CJam、6バイト

ri_m*,

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

ri       e# Read integer
  _      e# Duplicate
   m*    e# Cartesian power. The first argument is interpreted as a range
     ,   e# Number of elements. Implicitly display

Clojure、22

#(apply *(repeat % %))

:)

ローダ、17バイト

{product([_]*_1)}

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

これは、ストリームからの入力を受け取る匿名関数です。

説明：

{product([_]*_1)}
{               } /* An anonymous function */
         [_]      /* An array containing the input value */
            *_1   /* repeated times the input value */
 product(      )  /* Product of all values in the array */

dc、24 23 26 22バイト

これは、dcで再帰マクロを作成する最初の試みです。私はそれが次善策であり、多くを改善できると確信しています。

dsr1+[lrr1-d1<F*]dsFxp

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

編集：ありがとうeush77！-4バイト。

バッチ、58バイト

@set n=1
@for /l %%i in (1,1,%1)do @set/an*=%1
@echo %n%

32ビット演算のため、1桁の入力に対してのみ機能します。

brainf * ck、148バイト

,[->+>+<<]>>[-<<+>>]++++++++[<------<------>>-]<[->>+>>+<<<<]>>[-<<+>>]>>-[-<<<<<[>[>+>+<<-]>>[<<+>>-]<<<-]>>[-<<+>>]>>>]<<<++++++++[-<<++++++>>]<<.

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

組み込みなし;）

使い方

,                                       - get ascii input
[->+>+<<]                               - duplicate input
>>[-<<+>>]                              - shift inputs left to start
++++++++[<------<------>>-]             - convert ascii into input numbers
<[->>+>>+<<<<]                          - get loop intervals (same as input #)
>>[-<<+>>]                              - shift input back again
>>-[-<<<<<[>[>+>+<<-]>>[<<+>>-]<<<-]>>  - iterated addition (multiplication)
[-<<+>>]>>>                             - Shift output back into input
]<<<++++++++[-<<++++++>>]<<.            - convert final output to ascii

一言で言えば、これはx（入力）自体を乗算することで機能しますx。（別名反復反復追加）。最終結果はx ^ xです。

I / O

プログラムは、単一のASCII入力を受け取り、ASCIIインデックスから48を引いたものとして処理します。マイナス48は、実際の数値の入力を正規化することである（4となります52- > 52-48- > 4）。9より大きい数字を入力するには、次に対応するASCII文字を使用します（:-> 58-48->10）。プログラムは同様の方法で出力します。

I / Oをテストする

INPUT > PROCESSED INPUT >> OUTPUT > TRANSLATED OUTPUT
1 > 1 >> 1 > 1
2 > 2 >> 4 > 4
3 > 3 >> K > 27

3を入力すると印刷可能なASCII文字がなくなるため、理論的には数字のみを印刷できます。ただし、実際にこのようなビジュアライザーで動作するすべての入力を確認できます。

MATLAB / Octave、23バイト

@(n)(prod(n*ones(n,1)))

Python、32バイト

f=lambda g,z=1:z>g or g*f(g,z+1)

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

Common Lisp、59 42 40バイト

(lambda(x)(apply'*(fill(make-list x)x)))

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