Розділіть мене навпіл


15

Вам дадуть номер x, де 0 <= x <= 2^32 - 1.

Вам слід вивести список чисел у десятковій формі після рекурсивного розбиття у двійковому форматі.

Приклади:

Приклад 1:

255 -> 255 15 15 3 3 3 3 1 1 1 1 1 1 1 1

Поточний список справедливий 255.

Двійкове представлення 255є 1111 1111. Розділивши його, отримаємо 1111і 1111, які в десятковій частині є 15і 15.

Ми додаємо їх до списку, тому будемо мати 255 15 15.

Тепер цифри 15і 15будуть слугувати вхідними даними, і ці числа потрібно розділити.

Роблячи це знову, ми отримуємо ( 3 3від обох 15с): 255 15 15 3 3 3 3.

Продовжуючи логіку, буде остаточний список 255 15 15 3 3 3 3 1 1 1 1 1 1 1 1. А оскільки 1вже не можна розділити, вихід припиняється.

Приклад 2:

225 -> 225 14 1 3 2 1 1 1 0

Стартовий список є 225.

Двійкове представлення 225є 1110 0001. Розділивши його, отримаємо 1110і 0001, які в десятковій частині є 14і 1.

Додавши їх до списку, ми отримуємо 225 14 1.

Тепер цифри 14і 1будуть слугувати вхідними даними, і ці числа потрібно розділити.

Оскільки 1не можна розділити, вихід буде 225 14 1 3 2.

Приклад 3:

32 -> 32 4 0 1 0

Умови :

  1. Якщо число двійкових цифр непарне, перше число матиме одну меншу двійкову цифру, ніж наступне. Приклад, 20 (10100)буде розділений як 10і 100, з десятковим виходом 2та 4.
  2. Застосовуються стандартні правила лазівки.
  3. 0s і 1s не поширюються далі.
  4. Збій програми для спроби відображення занадто великої кількості є дійсною умовою виходу.

Лише пропозиція, а як щодо того, щоб двійкові цифри були 0підписані s, коли довжина непарна?
Каїр coinheringaahing

1
@ Satan'sSon Якщо ви подушечки спереду, це рівнозначно опису.
isaacg

1
Чи потрібний вказаний вихідний порядок або лише значення?
Джонатан Аллан

@ Satan'sSon Без оббивки з 0s.
ctrl-shift-esc

1
@JonathanAllan Вказаний вихідний порядок необхідний.
ctrl-shift-esc

Відповіді:


13

Піт, 18 байт

u+QiR2smc2+0dt#.BM

Тестовий набір

Цей код робить щось дуже складне і розумне u, оператором фіксованої точки Pyth.

Тіло функції, яке є всім, окрім u, є досить простим:

+QiR2smc2+0dt#.BM
+QiR2smc2+0dt#.BMG    Implicit variable
                      G will store the list of numbers from the previous iteration.
              .BMG    Map each number to its binary representation
            t#        Filter out the ones of length 1 (0 and 1)
      m               Map the remaining binary
         +0d          Prefix with a 0
       c2             Chop in half.
                      Since c puts the larger half first, prefixing with a 0
                      makes the chop work out right, and doesn't change the value.
     s                Concatenate
  iR2                 Map back to binary
+Q                    Add the input to the front of the list

Цей код видаляє 0 і 1, розбиває кожне число і додає вхід спереду.

u буде виконувати цю функцію за попереднім результатом функції, поки результат не перестане змінюватися.

Яке початкове значення uвикористовує? Це розумна частина: код не визначає, яке значення використовувати, тому він за замовчуванням вводиться. Але вхід не є списком чисел - це число. Піт неявно примушує число на час кулака через цикл до діапазону числа - [0, 1, ..., Q-1]. Це не схоже на результат, який ми хочемо отримати. На щастя,u знайдете правильний результат незалежно від того, який початковий вхід - бажаний вихід є єдиною фіксованою точкою функції, і повторне застосування завжди досягне її.

Давайте розглянемо проміжні значення програми з введенням 7. Я виділив префікс результату, який гарантовано є правильним, незалежно від початкового введення:

  1. 7(Неявно [0, 1, 2, 3, 4, 5, 6])

  2. [7,1, 0, 1, 1, 1, 0, 1, 1, 1, 2]

  3. [7, 1, 3,1, 0]

  4. [7, 1, 3, 1, 1]

Який вихід.


Запакований Pyth, 16 байт

Зауважте, що оскільки Pyth використовує лише діапазон 0-127 ASCII, його можна стиснути, використовуючи 7-бітове кодування, а не 8-бітове кодування. Таким чином, вищевказану програму можна упакувати в 16 байт. Отримана програма:

ꮎ�L����[
    ���4

hexdump:

0000000: eaae 8e9a 4cb9 edc6 c95b 0c9d 11ae 8534  ....L....[.....4

Перекладача можна знайти тут . Надайте введення як аргумент командного рядка.

Сторінка коду цієї мови (Packed Pyth) - це діапазон 0-127 ASCII, і кожен символ представлений 7 бітами, вкладеними в кінці. Таким чином, вищезгаданий нечитабельний гексад являє собою:

u+QiR2smc2+0dt#.BM

Але в 16 байт.


6

05AB1E , 21 20 18 17 байт

,¸[Žrbvy0ì2äCʒ=1›

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

Пояснення

,¸[Žrbvy0ì2äCʒ=1›   Argument n
,¸                  Print n and push n as array
  [Ž                Loop until stack is empty
    r               Reverse stack
     b              Convert elements in array to binary
      v             For each y in array
       y0ì2ä        Prepend '0' to y and split it into 2 elements
                    (the first element will take the additional character)
            C       Convert elements to decimal
             ʒ=1›   Keep only elements greater than 1, while printing each element

@JonathanAllan Yep виправив це зараз. Проблема, здається, не охоплює прикладів, дякую :)
kalsowerus

ʒ- Ця нова кодова сторінка ... З тих пір, коли 05AB1E Jelly? Мені подобається.
Чарівна восьминога урна

4

JavaScript (ES6), 99 байт

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

f=(n,p=(a=[],1),i=33-Math.clz32(n)>>1)=>(a[p]=n)>1?f(n>>i,p*=2)&&f(n&(1<<i)-1,p+1):a.filter(n=>1/n)

Демо


4

Желе , 21 20 байт

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

ỊÐḟBUœs€2UḄF
WÇÐĿṖUF

Монадійне посилання, що приймає номер і повертає вказаний список.

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

Як?

ỊÐḟBUœs€2UḄF - Link 1, perform an iteration: list of numbers
 Ðḟ          - filter out if:
Ị            -   insignificant (absolute value <= 1 - hence any 0s or 1s)
   B         - convert to a binary list (vectorises)
    U        - upend (reverse each)
     œs€2    - split €ach into 2 equal chunks (the first half is longer if odd ...hence
         U   - upend (reverse each)         ...this upend and the previous one)
          Ḅ  - convert from binary list to number (vectorises, although when the filter
             -                                     removes everything a zero is yielded)
           F - flatten the resulting list of lists to a single list

WÇÐĿṖUF - Main link: number
W       - wrap in a list
  ÐĿ    - loop and collect results until no change occurs:
 Ç      -   call last link (1) as a monad
    Ṗ   - pop (remove the last element - a list containing a single zero which results
        -     from the effect of Ḅ when link 1's input only contained ones and zeros)
     U  - upend (put the iterations into the required order)
      F - flatten to yield a single list

Як це працює?
1717

@ Satan'sSon Я додав пояснення саме зараз
Джонатан Аллан

Ви додали це в той же час, коли я прокоментував: D
caird coinheringaahing

@ ØrjanJohansen обидва способи мають однакову вартість байтів
Джонатан Аллан

О, спочатку не побачила відповіді Pyth, яка вже використовувала цю хитрість.
Ørjan Johansen

2

Java 7, 541 байт

import java.util.*;List l=new ArrayList(),L=new ArrayList();String c(int n){l.add(x(n));return a(n+" ",l,n);}String a(String r,List q,Integer n){boolean e=q.equals(l),E=q.equals(L);if(e)L.clear();else l.clear();for(String i:new ArrayList<String>(q)){int s=i.length()/2,a=n.parseInt(i.substring(0,s),2),z=n.parseInt(i.substring(s),2);r+=a+" "+z+" ";if(e&a>1)L.add(x(a));if(e&z>1)L.add(x(z));if(E&a>1)l.add(x(a));if(E&z>1)l.add(x(z));}if(e&L.size()>0)r=a(r,L,n);if(E&l.size()>0)r=a(r,l,n);return r;}String x(Integer n){return n.toString(n,2);}

Тримання оригінального замовлення накручувало мене протягом великого часу, інакше це був би простой цикл і принцип рекурсивного виклику. І все-таки цікаве завдання розібратися, зберігаючи порядок.

Пояснення:

import java.util.*;                    // Required import for List and Array List

List l=new ArrayList(),L=new ArrayList(); 
                                       // Two Lists on class-level

String c(int n){                       // Method (1) with integer parameter and String return-type
  l.add(x(n));                         //  Start by adding the binary-String of the input integer to list `l`
  return a(n+" ",l,n);                 //  And let the magic begin in method `a` (2)
}                                      // End of method (1)

String a(String r,List q,Integer n){   // Method (2) with a bunch of parameters and String return-type
  boolean e=q.equals(l),E=q.equals(L); //  Determine which of the two class-level Lists the parameter-List is
  if(e)                                //  If it's `l`:
    L.clear();                         //   Empty `L`
  else                                 //  If it's `L` instead:
    l.clear();                         //   Empty `l`
  for(String i:new ArrayList<String>(q)){
                                       //  Loop over the input list (as new ArrayList to remove the reference)
    int s=i.length()/2,                //   Get the length of the current item in the list divided by 2
                                       //   NOTE: Java automatically floors on integer division,
                                       //   which is exactly what we want for the splitting of odd-length binary-Strings
    a=n.parseInt(i.substring(0,s),2),  //   Split the current binary-String item in halve, and convert the first halve to an integer
    z=n.parseInt(i.substring(s),2);    //   And do the same for the second halve
    r+=a+" "+z+" ";                    //   Append the result-String with these two integers
    if(e&a>1)                          //   If the parameter List is `l` and the first halve integer is not 0:
      L.add(x(a));                     //    Add this integer as binary-String to list `L`
    if(e&z>1)                          //   If the parameter List is `l` and the second halve integer is not 0:
      L.add(x(z));                     //    Add this integer as binary-String to List `L`
    if(E&a>1)                          //   If the parameter List is `L` and the first halve integer is not 0:
      l.add(x(a));                     //    Add this integer as binary-String to List `l`
    if(E&z>1)                          //   If the parameter List is `L` and the second halve integer is not 0:
      l.add(x(z));                     //    Add this integer as binary-String to List `l`
  }                                    //  End of loop
  if(e&L.size()>0)                     //  If the parameter List is `l` and List `L` now contains any items:
    r=a(r,L,n);                        //   Recursive call with List `L` as parameter
  if(E&l.size()>0)                     //  If the parameter List is `L` and List `l` now contains any items:
    r=a(r,l,n);                        //   Recursive call with List `l` as parameter
  return r;                            //  Return the result-String with the now appended numbers
}                                      // End of method (2)

String x(Integer n){                   // Method (3) with Integer parameter and String return-type
  return n.toString(n,2);              //  Convert the integer to its Binary-String
}                                      // End of method (3)

Код тесту:

Спробуйте тут.

import java.util.*;
class M{
  List l=new ArrayList(),L=new ArrayList();String c(int n){l.add(x(n));return a(n+" ",l,n);}String a(String r,List q,Integer n){boolean e=q.equals(l),E=q.equals(L);if(e)L.clear();else l.clear();for(String i:new ArrayList<String>(q)){int s=i.length()/2,a=n.parseInt(i.substring(0,s),2),z=n.parseInt(i.substring(s),2);r+=a+" "+z+" ";if(e&a>1)L.add(x(a));if(e&z>1)L.add(x(z));if(E&a>1)l.add(x(a));if(E&z>1)l.add(x(z));}if(e&L.size()>0)r=a(r,L,n);if(E&l.size()>0)r=a(r,l,n);return r;}String x(Integer n){return n.toString(n,2);}

  public static void main(String[] a){
    M m=new M();
    System.out.println(m.c(255));
    m.l.clear();
    m.L.clear();
    System.out.println(m.c(225));
    m.l.clear();
    m.L.clear();
    System.out.println(m.c(32));
  }
}

Вихід:

255 15 15 3 3 3 3 1 1 1 1 1 1 1 1 
225 14 1 3 2 1 1 1 0 
32 4 0 1 0 



2

PHP, 132 байт

for($r=[$argn];""<$n=$r[+$i++];)$n<2?:[$r[]=bindec(substr($d=decbin($n),0,$p=strlen($d)/2)),$r[]=bindec(substr($d,$p))];print_r($r);

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


Це не працює, відповідно до системи "Спробуйте в Інтернеті" на цій сторінці,
Мартін Баркер

@MartinBarker, що ти маєш на увазі?
Йорг Гюльсерманн

tio.run/nexus/… => Array( [0] => 225 [1] => 14 [2] => 1 [3] => 3 [4] => 2 [5] => 1 [6] => 1 [7] => 1 [8] => 0 )коли це не = 255 15 15 3 3 3 3 1 1 1 1 1 1 1 1 1
Мартін Баркер

@MartinBarker Ви повинні змінити вхід у версії заголовка. Зміна змінної $argnЦя змінна доступна, якщо ви запускаєте PHP з командного рядка з -Rопцією. Ось приклад для введення 255 Спробуйте в Інтернеті!
Йорг Гюльсерманн

Це те, що я намагався сказати, що це не спрацювало відповідно до онлайн-системи спробувати. (посилання в дописі)
Мартін Баркер


Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.