Уявіть собі кубик, який ми можемо нарізати кубиками дрібнішого розміру, не залишившись.

Знайдіть, скільки кубиків можна вирізати кубиком.

Наприклад, куб можна розрізати на 8, 27 (очевидно, 3-я сила цілих чисел) і 20 (19 маленьких кубів плюс один вісім разів більше інших), див. Зображення).
Ознайомтеся з деякою допомогою: http://mathworld.wolfram.com/CubeDissection.html

Програма повинна взяти за вхід ціле число n( 0 <= n <= 1 000) і роздрукувати всі числа, менші або рівні, щоб nкуб можна було вирізати на цю кількість кубів. Припустимо, що кубик можна розрізати на 1 куб, а не на 0 кубів.

Ви можете використовувати лише інтегральні типи даних (без масивів, об'єктів тощо) розміром не більше 64 біт. Найкоротший код виграє.

Гольфскрипт, 55 (або 43 42)

{.:^}{.47>20{.^>^@- 7%|!|}:/~1/38/39/{}{;}if^(}while;]`

Може бути перевірено тут (просто змінити число в рядку 2) і використовує тільки масив (останні два символи коду) для чистої друку, а не для вирішення будь-якого збору або проблем. Якщо залишити його, усі результати будуть об'єднані.

Метод: Ітерація вниз від заданого n: Якщо поточне число більше 47 або виду 1 + 7x, 20 + 7x, 38 + 7x або 39 + 7x, де x = будь-яке невід'ємне ціле число, тоді зберігайте його в стеку , інакше киньте його.

Коротка відповідь (43 байти):

{: / 6 +, {7 * / +}% |}: &;): a, 48, ^ 1 & 20 & 38 & 39 & {a <}, `

):a,48,^1{:/6+,{7*/+}%|}:&~20&38&39&{a<},`

Метод: подібний, але з кількома опціями теорії множин. Тут використовуються масиви, тому технічно це не прийнятна відповідь. Можна протестувати тут . Btw: ніхто ніколи не говорив, що вони повинні бути в якомусь конкретному порядку;)

Математика, 62 байти (або 52)

Це жорстока відповідь, нічого цікавого.

If[EvenQ@BitShiftRight[164015534735101,n],Print@n]~Do~{n,1000}

Ця довжина становить 52 байти, але порушує мої правила - вона використовує великі цілі числа (сили 2) та списки (діапазон).

Select[Range@1000,EvenQ@Floor[164015534735101/2^#]&]

C, 72

i;main(){for(scanf("%d",&i);i;i--)0x952BD7AF7EFC>>i&1||printf("%d ",i);}

Ще одна тверда відповідь. Це відлічується вниз (в правилах немає нічого про порядок виведення чисел.) Теоретично це повинно працювати. Константа має біт, встановлений на 1 для всіх чисел, куди НЕ можна розрізати, і 0 для чисел, які можуть. Теоретично, константа, коли справа зміщена на дуже велике число, повинна дорівнювати нулю, тому велика кількість завжди повинна бути надрукована.

Цікаво, що на практиці це не працює. Код, що знаходиться вище, компілюється і працює в GCC до 65. Але вище цієї кількості в компіляторі є помилка (або "особливість"). це трактує 0x952BD7AF7EFC>>iяк 0x952BD7AF7EFC>>i%64. Отже, він пропускає (наприклад) числа 66 по 71 (64 + 2 до 64 + 7).

Для запуску в Visual Studio потрібно трохи більше шаблону (він не дозволяє вам відволіктись від таких речей, як маються на увазі цілі числа і #includes.) Після запуску програми працює нормально до 257 ... Потім вона пропускає 258 263 (256 + 2 до 256 + 7.) Значить, це береi%256.

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