12

Це виклик копів та грабіжників . Поліція копів до цього виклику знаходиться тут

Цікавим питанням, про який слід задуматися, є наступне:

Якщо у мене є послідовність чисел, скільки я маю надати, перш ніж стане зрозуміло, про яку послідовність я говорю?

Наприклад, якщо я хочу поговорити про натуральні цілі, щоб починати з , я можу сказати , але чи справді цього достатньо? $1$ $1,2,3, \dots$

Я маю один спосіб відповісти на це запитання, і бути гравцем у коді Це передбачає код-гольф. Ви надали достатньо термінів послідовності, якщо найкоротший код, який створює ці терміни, створює всі умови послідовності. Якщо ми подумаємо про це з точки зору коду-гольфу, це означатиме, що ви надали достатньо тестових випадків, так що найкоротший код, який передає тестові випадки, виконує бажане завдання.

Виклик

Цей виклик є викликом для поліцейських та грабіжників . У яких поліцейські представлятимуть тестові справи, а грабіжникам доведеться знайти коротший спосіб підробляти тестові справи, окрім передбачуваної послідовності. Копи представлять наступні речі:

Шматок коду, який приймає додаткове ціле число в якості вхідного даних і виробляє ціле число як вихід. Цей код може бути нульовим або індексованим, але має бути зрозуміло, що таке індексація. Цей код визначатиме вашу послідовність.
Будь-які відповідні вимоги до платформи чи мови, які можуть вплинути на вихід, наприклад, розмір longint.
Число , поряд із першими членами послідовності, обчисленими кодом. Вони будуть виконувати роль "тестових випадків". $n$ $n$

Розбійники знайдуть програму на тій же мові, яка коротша за представлену, і передає всі тестові випадки (видає той самий вихід для перших входів, як і код поліцейського). Код грабіжника також повинен відрізнятися за результатами програми копа на деяку кількість, що перевищує . $n$ $n$

Оцінка балів

Грабіжники будуть набрані за кількістю тріщин, які вони виявлять, а більше тріщин буде кращим. Відповідь можна знову зламати, знайшовши дійсну відповідь, меншу за вихідну. Якщо відповідь зламається вдруге, то бал надається другому злому, а не першому.

sequence cops-and-robbers

— Спеціальний мисливець на Гарф
джерело

2

Чи не дозволяємо розбійникам бити один одного за зламати відповідь (тобто найкоротший тріск у мові, який перемагає)

— fəˈnɛtɪk

@ fəˈnɛtɪk Звучить, добре, що я додав це.

— Ad Hoc Hunter Hunter

6

cQuents , відповідь Стівена , 3 байти

z~$

Спробуйте в Інтернеті!

Як це працює

z     Last item in the sequence
 ~    Concat
  $   Current index

Схоже , послідовності повинні бути однаковими, але це дає 12345678910для в n = 10той час як "::$дає 1234567891.

— Бубон
джерело

5

JavaScript, відповідь fəˈnɛtɪk (17 байт)

x=>"11237"[x]||22

Що ж, на жорсткому коді було легко отримати набагато менший бал ... Відмінність від еталонної реалізації для будь-якого запису , 0-індексується. Для цього використовується дуже відомий трюк для гольфу JS: індексація в послідовності з цілим числом, яке перевищує межі його, повертає помилкове значення ( ), тому в цьому просто його можна привести до значення за замовчуванням, використовуючи логічний АБО ( ) випадку , що обробляє останній термін послідовності, а також наступний термін. $x\ge 6$ undefined||22

Тестування

let f=x=>"11237"[x]||22

for (x of [1,2,3,4,5,6,7]) {
  console.log(x + ' -> ' + f(x))
}

Розгорніть фрагмент

Крім того, спробуйте в Інтернеті!

— Містер Xcoder
джерело

4

Хаскелл , відповідь Лайконі , 15 байт

b n=n*div(n+1)2

Спробуйте в Інтернеті!

Я б зазвичай щось подібне вказав у коментарі, але тоді я подумав, що поліцейські та грабіжники трохи більше пересічені.

Це лише відповідь BMO мінус особливий випадок b 42. Оскільки оригінал Лайконі переходить через плаваючу точку, це не обов'язково: просто знайдіть число, яке є досить великим, щоб дати помилки округлення в цьому, але не в точній Integerарифметиці. Наприклад:

a 100000000000000000000000 = 4999999999999999580569600000000000000000000000
b 100000000000000000000000 = 5000000000000000000000000000000000000000000000

— Ørjan Johansen
джерело

Я думав, що це може бути можливим (отже, я написав, що його можна переписати на необхідні умови), але не знайшов значення, для якого це працює. Чудово зроблено!

— ბიმო

4

Python 2 , відповідь xnor , 43 байти

$n = 69$

f=lambda n,p=2:n<1or-~f(n-(~-2**p%p<2),p+1)

Спробуйте в Інтернеті!

Кредити

Велика заслуга цього тріска повинна бути приписана @ Mr.Xcoder, який вперше опублікував коментар про можливу атаку за допомогою цього методу, та @PoonLevi, який знайшов 44-байтове рішення.

Як?

Теорія

$p$ $a$ $p$

\begin{matrix} (1) & а^{p - 1} \equiv 1 (мод p) \end{matrix}

$a^{p-1}\equiv 1 \pmod p\tag{1}$

$a=2$

2^{p - 1} \equiv 1 (мод p)

$2^{p-1}\equiv 1 \pmod p$

$k$

2^{p - 1} = к p + 1

$2^{p-1}=kp+1$

Що призводить до:

2^{p} = 2 к p + 2

$2^p=2kp+2$

2^{p} - 1 = 2 к p + 1

$2^p-1=2kp+1$

\begin{matrix} (2) & 2^{p} - 1 \equiv 1 (мод p) \end{matrix}

$2^p-1\equiv 1 \pmod p\tag{2}$

$p=2$ $2$

$a^{n-1}\equiv 1 \pmod n$ $n$ $a$

$2$ $n = 341=11\times 31$

2^{341 - 1} \equiv 1 (мод 341)

$2^{341-1}\equiv 1 \pmod{341}$

2^{341} - 1 \equiv 1 (мод 341)

$2^{341}-1\equiv 1 \pmod{341}$

$341$ $347$

Впровадження

$(2)$

f=lambda n,p=1:n and-~f(n-(~-2**p%p==1),p+1)

<2==1 $1$ $2^1-1\equiv 0 \pmod 1$

f=lambda n,p=1:n and-~f(n-(~-2**p%p<2),p+1)

Спробуйте в Інтернеті!

$p=2$

f=lambda n,p=2:n and-~f(n-(~-2**p%p<2),p+1)

Спробуйте в Інтернеті!

Останній трюк - використовувати n<1orзамість n and. Це так само довго, але робить останню ітерацію поверненням True, а не 0 , отже, додаючи відсутнє зміщення до кожного терміна.

— Арнольд
джерело

Вітаю всіх вас! Це рішення, яке я мав на увазі. Я вважаю смішним, що з мотивації виклику "Якщо у мене є послідовність чисел, скільки я маю надати, перш ніж зрозуміти, про яку послідовність я говорю?", Перших 50 простих чисел, очевидно, недостатньо - інопланетянин з пітон-гольфу припускає, що ви говорите про іншу послідовність.

— xnor

@xnor Мені подобається ідея "інопланетянина з гольф-

— пітонів

3

Python 3 , краш , 45 байт

lambda n:int(60*math.sin(n/10-2))
import math

Спробуйте в Інтернеті!

x*60-x**3*10+x**5/2-x**7/84 $sin(x)$ $x^7$

— xnor
джерело

3

JavaScript (ES6), відповідь Арнольда (10 байт)

n=>8*n*n|n

Спробуйте в Інтернеті!

— ngn
джерело

2

Хаскелл , відповідь Лайконі , 26 22 байти

_{-4 байти, не використовуючи інфікс div, завдяки Лайконі !}

b 42=0;b n=n*div(n+1)2

Спробуйте в Інтернеті!

Пояснення

$0 \leq n \leq 20$ ceiling(realToFrac n/2)div(n+1)2 $n > 20$

b 42=0

— ბიმო
джерело

Ах, я про це не думав. У мене інший підхід, який призводить до тріщини 20 байтів, якщо ви хочете трохи загадати. Також ((n+1)`div`2)-> div(n+1)2.

— Лайконі

@Laikoni: Так, ще не розкривайте це! На жаль, давно минуло, коли я займався гольфом, я його оновлю.

— ბიმო

2

> <> , відповідь аварії 203 байти

:l2-$g:0=?;n:





M
-
B
"
BM
",
7M
!"
BBM
!",
7CM
!"-
BBBM
!!",
7BBMM
!!,,
7BBBMM
!!,,
7BBBMM
!!!,,
7BBBBMM
!!!,,
7BBBBMM
!!!!,,
7BBBBBMM
!!!!,,
7BBBBBMM
!!!!!,,
7BBBBBBMM

Спробуйте в Інтернеті!

Я збирався зробити щось розумне з тим, що непарні / парні числа вище n=20були однаковими, за винятком повторюваного елемента в центрі, але було легше просто жорстко кодувати кожен елемент.

Введення здійснюється через -vпрапор. Нічого не друкується для елементів старше 34 років.

— Джо Кінг
джерело

2

Паскаль (FPC) , відповідь AlexRacer , 80 байт

var n,m:word;begin read(n);while n<>0 do begin n:=n div 2;m:=m+n;end;write(m)end.

Спробуйте в Інтернеті!

$0\le n\le 120$ $n=128$ $127$ $126$

Це здається пізньою відповіддю, але все одно дякую @AlexRacer за гарну головоломку!

— r_64
джерело

1

Ого, це навіть коротше, ніж у мене. Ласкаво просимо до PPCG!

— AlexRacer

1

JavaScript, відповідь fəˈnɛtɪk (12 байт)

$x=6$

x=>2.72**x|0

Тестування

g=
x=>2.72**x|0

tmp=[0,1,2,3,4]
console.log(tmp.map(g).join(','))

Розгорніть фрагмент

Крім того, спробуйте в Інтернеті!

— Містер Xcoder
джерело

1

JavaScript, fəˈnɛtɪk (17 байт)

Ви можете бачити у посиланні TIO або в результаті фрагмента стека, що він не вдається для записів вище $15$ .

x=>2.7182819**x|1

Якщо точність буде потрібна лише для (перші значень), то $n\le 14$ $15$ x=>Math.exp(x)|1 вона працювала б і для 16 байт.

Тестування

f=x=>2.7182819**x|1
g=x=>(3-(5/63)**.5)**x|1

tmp=[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21]
console.log(tmp.map(f).join(","))
console.log(tmp.map(g).join(","))

Розгорніть фрагмент

Крім того, спробуйте в Інтернеті!

— Містер Xcoder
джерело

1

Лушпиння , розбивши 5 байт БМО з 3 2 байтами

-1 завдяки BMO ( LdΣ-> LΣоскільки, коли йому дано a Tnum, Lвиконується "довжина представлення рядків")

LΣ

Спробуйте в Інтернеті!

$a(0)\cdots a(23)$ $a(24)$
LΣ $3$ ←d+16 $4$ .

_{$T(0)=0$ $1$ $0$}

— Джонатан Аллан
джерело

Вітаю, це було моє точне рішення! Однак я щойно зазначив, що для TNum s Lта Ld еквівалента економлять байт;)

— ბიბ

Ах, я шукав "цифру" у вікі, щоб спробувати знайти цифрову довжину, але не помітив, що Lзамінює "довжину представлення рядків" для Tnum.

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

(Зверніть увагу, що вони еквівалентні лише для негативних цілих чисел - досить добре для цього.)

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

1

> <> , Відповідь Ейдена Ф. Пірса , 36 байт

v101786
i5844
419902
%
>l{:}g:0=?;o:

Спробуйте в Інтернеті!

Ще одне рішення з кожним твердим кодом на рядок. Оскільки оригінальна відповідь також була здебільшого жорсткою, я не відчуваю себе занадто винним у цьому.

— Джо Кінг
джерело

0

JavaScript, відповідь fəˈnɛtɪk , 23 байти

$0$ $n\ge 14$

x=>14-`${73211e9}`[x]|0

Спробуйте в Інтернеті!

Як?

Вираз `${73211e9}`розширюється до рядка "73211000000000", надаючи таблицю пошуку з 14 значень, які віднімаються з 14, що дає очікувану послідовність.

$n\ge 14$

(14 - undefined) | 0
=== NaN | 0
=== 0

21 байт

NaN $n\ge 14$

x=>14-`${73211e9}`[x]

Спробуйте в Інтернеті!

— Арнольд
джерело

Жорстке кодування копів та розбійників (грабіжників)

Виклик

Оцінка балів

cQuents , відповідь Стівена , 3 байти

Як це працює

JavaScript, відповідь fəˈnɛtɪk (17 байт)

Тестування

Хаскелл , відповідь Лайконі , 15 байт

Python 2 , відповідь xnor , 43 байти

Кредити

Як?

Теорія

Впровадження

Python 3 , краш , 45 байт

JavaScript (ES6), відповідь Арнольда (10 байт)

Хаскелл , відповідь Лайконі , 26 22 байти

Пояснення

> <> , відповідь аварії 203 байти

Паскаль (FPC) , відповідь AlexRacer , 80 байт

JavaScript, відповідь fəˈnɛtɪk (12 байт)

Тестування

JavaScript, fəˈnɛtɪk (17 байт)

Тестування

Лушпиння , розбивши 5 байт БМО з 3 2 байтами

> <> , Відповідь Ейдена Ф. Пірса , 36 байт

JavaScript, відповідь fəˈnɛtɪk , 23 байти

Як?

21 байт