9

Ваша задача состоит в том, чтобы напечатать xцифры числа пи, где xваша длина кода.

Примеры:

Source code (length) -> output
foo!        (4)         3.141
foobar      (6)         3.14159
kinda long  (10)        3.141592653
+++++       (5)         3.1415
123456789   (9)         3.14159265

Вы можете использовать, чтобы определить количество цифр, которые нужно распечатать. Обратите внимание, что десятичная точка не считается цифрой числа пи - поэтому код длины 3 должен иметь выходную длину 4.floor(π/10 * 10^code_length) / 10^{code_length - 1}3.14

Правила:

Длина вашего кода должна быть больше трех символов.
Вы не можете использовать какие-либо стандартные лазейки.
Вы можете использовать любые стандартные разрешенные методы вывода.
Вы не можете читать свой источник, чтобы определить длину кода.
Вы не можете использовать встроенную константу числа Пи.
Пи должен быть абсолютно точным и не приближенным.
Десятичная точка в выходных данных является обязательной. Если вы решите выводить через возвращаемое значение, вы должны вернуть целое число с плавающей запятой.
Цель этой задачи - найти самое короткое решение для каждого языка, а не самый короткий язык для решения. Не бойтесь публиковать решение на языке, когда более короткое решение публикуется на том же языке, если ваше решение использует другой метод.

... так будет ли это действительным или нет?

Джонатан Аллан

(изменить ^ это даже (округление))

Джонатан Аллан

«Длина кода» ← в байтах или символах?

Линн

@ Линн Байт, как обычно.

MD XF

Есть только 3разрешено?

NoOneIsHere

3

Japt , 9 4 байта

Как можно короче, как можно :)

Включает непечатаемый (обратный перевод строки, код 141) после #.

3.#

Попробуй это

В Japt любой последующий символ #преобразуется в его код символа и добавляется к любым цифрам или десятичным точкам, которые могут предшествовать ему, в этом случае3.

мохнатый
источник

8

Mathematica, 18 байт

используя дзета-функцию

Sqrt[6Zeta@2]~N~18

Попробуйте онлайн!

J42161217
источник

7

Желе , 9 байт

“Œı⁸Ç’÷ȷ8

Попробуйте онлайн!

Выходы 3.14159265

Как это работает

“Œı⁸Ç’     - The integer 314159265
      ÷    - divide
       ȷ8  - The integer 100000000

fireflame241
источник

Пи не рассчитывается!

sergiol

5

да, это деление 314159265 на 100000000 :-)

Флориан F

6

VBA (Excel), 15 байт

MsgBox 4*Atn(1)

Выход: 3.14159265358979

Я думаю, что это неприемлемо, поскольку я играл в гольф, чтобы соответствовать длине PI. Его длина в гольфе составляет 17 байтов. D:

remoel
источник

1

Похоже, вас еще не приветствовали, так что добро пожаловать на сайт!

MD XF

О, спасибо, сэр! : D

переделывать

Разве не AtnАрктангенс? Я не уверен, разрешено ли это ... спрашиваю OP

JungHwan Мин

Я думал, что OP ссылается только на встроенный PI. Виноват.

переделывать

5

Желе , 6 байт

3;⁽4ƒṾ

Попробуйте онлайн!

Печать 3,14159с разрешенным «европейским» десятичным разделителем ,.

Как?

3;⁽4ƒṾ - Main link: no arguments
3      - literal 3                3
  ⁽4ƒ  - base 250 literal 14159   14159
 ;     - concatenate              [3,14159]
     Ṿ - unevaluate               ['3', ',', '1', '4', '1', '5', '9']
       - implicit print           3,14159

Джонатан Аллан
источник

1

Этот список цифр выглядит странно. Я думаю, что там есть лишнее ,'.

Джонатан Фрех

1

Вы можете сделать -ÆAær5и использовать .вместо ,, но тогда это будет так же, как мой раствор желе.

Захари

4

Python 3 , 64 байта

print("3.%d"%int("SIXW57LUPVBUA10HBQJOL57QLF54UT0U00KIN32O",36))

Попробуйте онлайн!

Дрянная Монахиня
источник

Эквивалент Python 2 составляет 60 байтов print'3.%d'%int('3p3aqd50r7654t9ywkfkgsm0yx0bikcluxlhsm',36).

Джонатан Аллан

@JonathanAllan python 2 в 59: tio.run/##K6gsycjPM/r/…

primo

@primo похоже на сообщение, если и когда ...

Джонатан Аллан

1

@JonathanAllan, если ты имеешь в виду, когда он снова откроется, то сейчас.

MD XF

4

SOGL V0.12 , 10 9 7 байтов

4ΘΞ“6⌡υ

Попробуй здесь!

Объяснение:

4ΘΞ“     push 31415
    6⌡   6 times do
      υ    divide by 10

dzaima
источник

4

Desmos , 130 байт

f\left(\right)=\frac{\operatorname{floor}\left(10^{128}\cdot 4\sum_{k=1}^{9^9}\frac{\left(-1\right)^{k+1}}{2k-1}\right)}{10^{128}}

Исходный код для этого (доступ к которому можно получить путем копирования и вставки внутри и снаружи Desmos) не является оптимальным при создании с помощью редактора Desmos, поэтому несколько байтов пустого пространства были заполнены, где это возможно.

Это определяет функция , fкоторая не принимает никаких аргументов возвращают пи, вычисленная с помощью Gregory последовательности , чтобы k=9^9 (я не могу подтвердить , что это достаточно точен, однако я придерживаюсь считаем , что это, может быть более точным , с большим значением к ) он затем 128помещает результат в десятичные разряды, что наряду 3.с длиной исходного кода.

Попробуйте онлайн!

Ataco
источник

Как на самом деле увидеть результат - я вижу только 3.14159265617, я смотрю не в том месте; мне нужно нажать кнопку?

Джонатан Аллан

Desmos по умолчанию не печатает столько знаков после запятой, сколько предусмотрено, но значение все равно должно быть точным.

ATaco

1

Это разочаровывает, поскольку задача состоит в том, чтобы «напечатать ...»

Джонатан Аллан

1

«Десятичная точка в выходных данных необходима. Если вы хотите вывести через возвращаемое значение, вы должны вернуть целое число с плавающей запятой». что делает это действительным.

ATaco

Я чувствую, что цель этого заявления состояла не в том, чтобы обеспечить меньшую точность, а в том, чтобы обеспечить десятичный разделитель. Имейте в виду, я не думаю, что ваш ответ плохой.

Джонатан Аллан

3

Древесный уголь , 8 байт

”i‴Ａχ:&”

Попробуйте онлайн!

Просто сжатая строка.

ASCII-только
источник

3

Javascript, 16 байт

_=>Math.acos(-1)

f=
_=>Math.acos(-1)
console.log(f())

Развернуть фрагмент

Герман Л
источник

3

CJam , 5 байтов

3.14F

Попробуйте онлайн!

Как это работает

3.14   e# Push 3.14.
    F  e# Push 15.

Деннис
источник

Если бы ты только мог это сделать 3.E. : P, в любом случае, удивительное злоупотребление IO.

Захари

Собирался опубликовать 3'.EF, но потом я увидел этот ответ ...

Esolanging Fruit

3

Нейм , 5 байт

3FBρσ

Объяснение:

3      Push 3
 FB    F pushes 45, B converts it into a character code, '.'
   ρ   Push 14
    σ  Push 15
Implicitly concatenate and print stack

Попробуйте онлайн!

Okx
источник

3

APL, 6 байтов

10○⍟-1

Принимает мнимую часть ln (-1).

Попробуйте онлайн!

Уриэль
источник

Эй, добро пожаловать обратно @Uriel! Хороший, я не думал ни о чем таком (с журналами отрицательных чисел), хорошая работа!

Захари

@ Zacharý спасибо, только что бросил визит и не мог не ответить на этот вопрос: P

Uriel

2

J , 16 байт

17j15":4*_3 o.1:

Попробуйте онлайн!

Похоже на ответ VBA. Выходы: 3.141592653589793.

Конор О'Брайен
источник

«Вы не можете использовать встроенный макрос или константу для определения числа пи». Забавно, это ваш комментарий

Leaky Nun

Ваш вывод 17 байтов, а не 16.

ATaco

1

Точно @ATaco, это 16 цифр

только ASCII

@ LeakyNun это не так. _3 o.1вычисляет атан (1). Как вы могли знать, я хорошо знаю правила.

Конор О'Брайен,

2

Math.JS , 17 байт.

     log(-1,e).im

Это 5 ведущих пробелов

Это рассчитывает до 15 знаков после запятой и неявно печатает это.

Попробуйте онлайн!

Ataco
источник

Ну, технически это вычисляет мнимую часть ln(-1), но, поскольку это чисто мнимое число, оно эквивалентно делению на i.

Захари

2

05AB1E , 11 байт

3•∊&SK•)'.ý

Попробуйте онлайн!

COMMAND     # CURRENT STACK         | EXPLANATION
------------#-----------------------+-----------------------------------
3           # [3]                   | Push 3.
 •∊&SK•     # [3, 1415926535]       | Push compressed base-255 number 1415926535.
       )    # [[3,1415926535]]      | Wrap the 2 to an array.
        '.  # [[3,1415926535],'.']  | Push a decimal point.
          ý # ['3.1415926535']      | Join 3 and 1415926535 with a decimal point.

ИСПОЛЬЗУЯ ВСТРОЕННЫЕ:

05AB1E , 4 байта

žq5£

Попробуйте онлайн!

3žs не работает по какой-то причине ...

Урна волшебного осьминога
источник

@ Захари, я что-то пропустил? Почему это особенное xD?

Волшебная Урна Осьминога

Это в моем имени пользователя, а также, вы можете добавить объяснение?

Захари

@ Zacharý HA! Мой мозг разбирался со всеми возможными забавными шутками, связанными с PPCG, которые могли быть пустыми. Я обдумываю дерьмо.

Волшебная урна осьминога

@ Захари также добавил.

Волшебная Урна Осьминога

Если МОЙ был неявный IO, то не было бы никакой возможности бить E3., я злюсь на моей самости теперь: с.

Захари

2

ForceLang , 269 байт

set S 0x5F258E476FC1B3B5571012206C637089460E41E814CB071E61431B5F0671F551D18D2C5D2D3A2565E408C6DE8D753F595B6E9979C3866D1C9965008DCFB02E3BD11D21DFFAF17978F05C8BBACF55A5ED5E90B1D8CAD8736AA4B728EB342B453F86353DB371D322B6A98613BC5CCB00AC2.mult 1e-270
io.write S.toString 268

SuperJedi224
источник

Ссылка на язык на github хотя бы.

Джонатан Аллан

2

MATL , 9 8 байт

-1X;V9:)

Попробуйте онлайн!

Объяснение:

-1      % number literal
X;      % inverse cosine (radians), giving pi
V       % convert to string
9       % specify precision
:)      % keep first 9 characters - 8 digits of precision

Спасен один байт благодаря Луису Мендо!

Б. Мехта
источник

1

Желе , 6 байт

-ÆAær5

Попробуйте онлайн!

Использует другой подход, чем другие ответы желе.

Как?

-ÆAявляется обратным косинусом -1(который является пи), ær5получает необходимый раздел. Так получилось, что округление эквивалентно усечению в этом случае

Zachary
источник

1

Haskell , 15 байт

 acos(-1)-3e-15

Попробуйте онлайн!

Используя формулу @JungHwanMin.

jferard
источник

1

Perl 5, 40 байт

}{$\=$\/~(2*$_)*~$_+2for-130..-2

Требуется опция командной строки -pMbignum, считается 8.

Образец использования:

$ perl -pMbignum test.pl < /dev/null
3.141592653589793238462643383279502884197

Я прошу прощения за отсутствие ссылки TIO, она, кажется, не поддерживает bignum(или непревзойденную открывающую скобку ...).

Примо
источник

1

МОИ , 7 байт

’2ō"8↑↵

Попробуйте онлайн!

Как?

’, уменьшить вершину стека (0 выталкивается, если пусто, делая стек [-1]). (Тот же символ, что и желе)
2, От себя 2 .
ō, так как вершина стека равна двум, отбросьте 2, поп n, затем нажмите acos(n)(в радианах, это дает пи, этот символo с отрицательным знаком поверх него o(для нормального триггера) происходит из APL).
"вставьте верхний элемент стека и вставьте его как строку.
8, От себя 8 .
↑, поп aтогда b, толкниb[:a] (это еще один символ, взятый из APL).
↵, вывод с новой строкой (OUTPUT <- STACK).

Zachary
источник

Затем добавьте неявный вывод: P

MD XF

Я придерживаюсь природы MY, я мог бы сделать улучшенную версию с фактическим синтаксисом и определенно с неявным выводом

Zacharý

1

RPL (HP48), 86,5 байта, 87 цифр [Это считается?]

« GROB 8 43
14159265358979323846264338327950288419716939937510582097494459230781640628620899862803
→STR 9 OVER SIZE SUB 2 "." REPL »

GROB - это ключевое слово для изображения. Следующие 2 числа - это ширина и высота. Следующие шестнадцатеричные цифры являются растровыми. Это 1 байт памяти на каждые 2 цифры плюс метаданные изображения.

Пустая программа « »занимает 10 байтов. Команда занимает 2,5 байта. Число с плавающей запятой занимает 10,5 байта, но если оно равно целому числу из одной цифры, оно может занимать 2,5 байта.

HP48 хранит 4, а не 8 бит в каждой ячейке памяти, поэтому байт занимает 2 последовательных местоположения (младший порядок). Часто используются 20-битные порции, и они занимают 2,5 байта (не 3).

Хеймдалль
источник

1

> <> , 16 байт

"]a:5;."3no>n<

Попробуйте онлайн!

Там есть пара непечатных документов, первый из которых имеет значение 26, а второй 141.

Джо Кинг
источник

0

Pyth , 9 байт

<`.ttZ4 T

Попробуй это здесь.

Работает с тем что $\ Pi \ \ approxeq агссоз (-1)$ .

Мистер Xcoder
источник

0

Рубин , 16 байт

->{Math.acos -1}

Попробуйте онлайн!

Легкая закуска
источник

0

Excel VBA, 16 байт

Анонимные функции непосредственного окна VBE, которые не требуют ввода и вывода в любой из STDOUT Excel VBA

_{Каждая строка представляет отдельную функцию, которая возвращает Pi длины 16}

?Mid(4*Atn(1),1)

?Str([Acos(-1)])

Debug.?4*Atn(1);

MsgBox[Acos(-1)]

[A1]="=ACOS(-1)"

Тейлор Скотт
источник

0

Октава , 16 байт

vpa(acos(-1),16)

Попробуйте онлайн!

Мне трудно представить, как это может быть короче ...

Sanchises
источник

0

PHP, 14 байт

Попробуйте онлайн!

<?=acos(-001);

Немного сложнее, но precition из M_PIIS3.1415926535898

Франциско Хан
источник

0

TI-BASIC, 7 байтов

round(4tan⁻¹(1),6

round(2sin⁻¹(1),6

round(cos⁻¹(-1),6

Эти три заявления будут напечатаны 3.141593.

Примечание: TI-BASIC - это токенизированный язык. Количество символов не равно количеству байтов.

Тау
источник

Выведите с тем же количеством цифр числа пи, что и длина кода

Ответы:

Japt , 9 4 байта

Mathematica, 18 байт

Желе , 9 байт

VBA (Excel), 15 байт

Желе , 6 байт

Как?

Python 3 , 64 байта

SOGL V0.12 , 10 9 7 байтов

Desmos , 130 байт

Древесный уголь , 8 байт

Javascript, 16 байт

CJam , 5 байтов

Как это работает

Нейм , 5 байт

APL, 6 байтов

J , 16 байт

Math.JS , 17 байт.

05AB1E , 11 байт

05AB1E , 4 байта

ForceLang , 269 байт

MATL , 9 8 байт

Желе , 6 байт

Как?

Haskell , 15 байт

Perl 5, 40 байт

МОИ , 7 байт

Как?

RPL (HP48), 86,5 байта, 87 цифр [Это считается?]

> <> , 16 байт

Pyth , 9 байт

Рубин , 16 байт

Excel VBA, 16 байт

Октава , 16 байт

PHP, 14 байт

TI-BASIC, 7 байтов