Що мені потрібно, щоб знищити світ?


19

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

Е=3ГМ25R

Де G - гравітаційна константа (6.672e-11 м 3 • кг -1 • s -2 ), M - маса, а R - радіус.

Я міг би зробити цей виклик з приводу просто обчислити це в джоулях (кг • м 2 • с -2 ), але… це було б нудно . І крім того, не всі розуміють джоулів.

Отже, замість цього давайте перетворимо його в наступні одиниці:

  • Кілотон тротилу (4,184 трлн джоулів, скорочення kilotons)
  • Ядерна зброя Хіросіми (62,76 трлн джоулів, скорочення nukes)
  • Hostess ™ Twinkies (560 000 Джоулів, скорочення twinkies)
  • Кіловат-години (рівно 3,6 млн. Джоулів, скорочення kWh)
  • Кілограми масової енергії (1 кг масової енергії = 299,792,458 2 джоулі, скорочення kg)

Отже, візьміть наступний вклад:

  • маса в кілограмах
  • радіус в метрах
  • один із шести різних входів, що представляють блок, який потрібно використовувати

І виводити енергію зв’язку у зазначені одиниці. Додайте скорочений блок до кінця виводу.

Правила

  • Скорочення для Джоула є J.
  • Довільна пробіл дозволена, доки вона не розділить скорочену одиницю чи кількість.
  • Наукові позначення дозволені в будь-якому форматі, якою використовується ваша мова.
  • Вам потрібні лише 4 значущі цифри. Плаваючі точки настійно рекомендуються.
  • Бла-бла найкоротша відповідь у байтах.

Випробування

Створено за допомогою цієї електронної таблиці .

Mass (kg)   Radius (m)  J           kilotons    nukes       twinkies    kWh         kg
3.302E+23   2440000     1.789E+30   4.275E+17   2.850E+16   3.194E+24   4.969E+23   1.990E+13
4.869E+24   6052000     1.568E+32   3.748E+19   2.499E+18   2.800E+26   4.356E+25   1.745E+15
5.974E+24   6371000     2.242E+32   5.360E+19   3.573E+18   4.004E+26   6.229E+25   2.495E+15
6.419E+23   3390000     4.866E+30   1.163E+18   7.753E+16   8.689E+24   1.352E+24   5.414E+13
1.899E+27   69911000    2.065E+36   4.935E+23   3.290E+22   3.687E+30   5.736E+29   2.298E+19
5.685E+26   58232000    2.222E+35   5.310E+22   3.540E+21   3.968E+29   6.172E+28   2.472E+18
8.683E+25   25360000    1.190E+34   2.845E+21   1.896E+20   2.125E+28   3.306E+27   1.324E+17
1.024E+26   24620000    1.705E+34   4.075E+21   2.717E+20   3.045E+28   4.736E+27   1.897E+17
1.311E+22   1186000     5.801E+27   1.387E+15   9.244E+13   1.036E+22   1.611E+21   6.455E+10
1.989E+30   696300000   2.274E+41   5.436E+28   3.624E+27   4.062E+35   6.318E+34   2.531E+24
7.350E+22   1737000     1.245E+29   2.976E+16   1.984E+15   2.223E+23   3.458E+22   1.385E+12

Натхненний живленням Зірки смерті Twinkies від Скотта Менлі.


що ви маєте на увазі під "замовчуванням для джоулів"? чи означає це, що вихідний блок не завжди буде наданий у вхід?
HyperNeutrino

8
також мені подобається, як насправді є назва кількості енергії, необхідної для повного знищення речі: P
HyperNeutrino

чи можемо ми прийняти вихідний блок як будь-який з 6 різних входів? в іншому випадку це громіздкий формат вводу-виводу, і це не відлякує
HyperNeutrino

@HyperNeutrino впевнений, але ви все ще потребуєте скорочення у висновку.
Нісса

2
@StephenLeppik " один із шести різних входів, що представляють собою одиницю для використання " - чи можуть ці вхідні дані бути 4.184, 62.76 тощо?
ngn

Відповіді:



16

JavaScript (ES6), 78 байт

Вводить дані як 3 різних змінних (mass, radius, unit).

(m,r,u)=>m*m/r/[8987e9,56,6276e6,,4184e5,1e-4,360][parseInt(u,30)%7]/2498e11+u

Тестові справи

Наступний фрагмент запускає всі тестові випадки в наданій електронній таблиці.

Як?

Це дуже схоже на відповідь @ ColeraSu на C , з JS-зручною хеш-функцією, яка працює на всю одиницю рядка.

Unit       | Parsed as (*) | Base-30 -> Dec. | mod 7
-----------+---------------+-----------------+------
"J"        | "j"           | 19              | 5        (*):
"kilotons" | "kilotons"    | 451052545318    | 4          Because we're parsing as Base-30,
"nukes"    | "n"           | 23              | 2          characters [u-z] (and anything
"twinkies" | "t"           | 29              | 1          after them) are simply ignored.
"kWh"      | "k"           | 20              | 6
"kg"       | "kg"          | 616             | 0

7

Желе , 78 байт

²×⁽LÐ÷ȷ14÷⁴÷5÷⁵ị“¤Fðẏẏż“?A⁺ẏẏż“¬ŀż“8Ƙż“¡uþ³⁾ẉṿÆ“¡’¤;⁵ị“ÞṠlT“¡ṁæ-“;ØḲ“ȧ¹“ṫD“}»¤

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

Речі, що стосуються струн, насправді не є типом виклику Jelly ...

-7 байт завдяки користувачу202729 (спасибі за те, що ти допомагаєш мені не бити JavaScript: D)


Так, тепер ти зв'язаний з JS і досі теж не на вершині.
Нісса

@StephenLeppik Принаймні мене не б'ють: D і shush 05AB1E за своєю суттю кращий при серйозних викликах: P
HyperNeutrino

6

C, 113 байт

Hash другого символу, використовуючи завершальну '\0'з "J". Використовується вбудований масив в C.

Зверніть увагу, нам потрібно помножити друге Mостаннє, інакше воно переповниться inf.

f(m,r,c)float m,r;char*c;{printf("%e%s",m/r/(float[]){1e-4,360,6276e6,8987e9,56,4184e5}[c[1]%36%7]/2498e11*m,c);}

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


+1. Не впевнений, якщо це можливо, але f (m, r, char * c) float m, r {…} врятує кілька байт. Також крапка з комою після printf необов’язкова
xanoetux

@xanoetux Який компілятор ви використовуєте? Хоча обидва не працюють на моїй машині.
Колера Су

Я використовую GCC. Неперевірений, але я абсолютно впевнений щодо останньої крапки з комою. (перевіримо пізніше)
xanoetux

4

APL (Dyalog Unicode) , 153 71 69 байт

op←{⍺,⍨40032E¯15÷÷/8987E13 36E5 6276E10 56E4 4184E9 1['gWuw '⍳⊃1↓⍺]⍵⍺⍺⍵}

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

Дякую @ Adám за те, що він абсолютно розчарував стару відповідь на цю. Завдяки @ngn за 2 байти.

Ця "функція" насправді називається оператором op. Усі значення одиниць вимірювання були перетворені на наукові позначення.

Як це працює:

{⍺,⍨40032E¯15÷÷/8987E13 36E5 6276E10 56E4 4184E9 1['gWuw '⍳⊃1↓⍺]⍵⍺⍺⍵}
                                                             1↓⍺          take the measurement unit without the first letter (because it is ambiguous)
                                                                         picks the first element returned by 
                                                                         Dyadic ota, which finds the index of
                                                  'gWuw '                 each of these characters
                                                 [             ]          square brackets indicate the index
               8987E13 36E5 6276E10 56E4 4184E9 1                         of the element of this vector (1-indexed) which will be used as the divisor for
            ÷/                                                  ⍵⍺⍺⍵      dividing by the left operand (⍺⍺) and the right argument squared.
    40032E¯15÷                                                            then divide this number by the result
 ⍺,⍨                                                                      and append the measurement unit

3

Пітон 3, 112 106 108 101 Байт

lambda m,r,u:str(40032e-19*m*m/r/{'':1e-4,'i':4184e5,'u':6276e6,'w':56,'W':360,'g':8987e9}[u[1:2]])+u

Досить прямо вперед. Використовує eпозначення Python . Використовується диктант, який розрізняє одиницю на основі другої літери та ділиться за значенням корозії. u[1:2]в основному u[1], очікуйте, що він повернеться ''замість помилки (про яку я дізнався лише зараз). Потім застосовується формула з кількома спрощеннями.

редагувати: до 106 завдяки абсолютно нелюдським, назад до 108 через значення нових ядерних одиниць і до 101 завдяки Colera Su.

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


3

Excel (Office 365), 106 101 97 байт

Припускаючи, що клітинка A1- це маса, A2є радіус, і B1це одиниця, записана як скорочення для виводу.

=40032E-19*A1^2/(A2*SWITCH(MID(B1,2,1),"u",6276E6,"w",56,"W",360,"g",89876E8,"i",4184E5,1E-4))&B1

Excel, 130 байт

Старомодний Excel не має такої SWITCHфункції

=40032E-15*A1^2/(A2*IF(B1="J",1,IF(B1="nukes",6276E10,IF(B1="twinkies",56E4,IF(B1="kWh",36E5,IF(B1="kg",299792E3^2,4184E9))))))&B1

Ви можете зберегти 2 байти, замінивши 299792E3^2на 89876E12 (Ще досить точний для запитань.) Розподілити всі значення на 1000збереження ще 2:=40032E-19*A1^2/(A2*SWITCH(MID(B1,2,1),"u",6276E6,"w",56,"W",360,"g",89876E8,"i",4184E5,1E-4))&B1
Wernisch

Гей, просто хочу викинути його там, що Switch()функція доступна для копій Excel на робочому столі, і вона була представлена ​​разом з Office 2016.
Тейлор Скотт

1

Рубі, 83 82 байти

->m,r,u{"#{40032E-18*m*m/r/[36E2,56,8987E9,1E-3,4184E6,6276E7][u.sum*3%71%6]} "+u}

Використовує нестандартний хеш для індексації LUT для одиниць ( i * k mod mформула). Номери були знайдені за допомогою грубої сили.


0

Excel, 94 байти

Бере масу від A1, радіус від B1, одиниця в C1. Подивіться на 2*Code(Unit) + Length(Unit) modulo 11.

=4.0032E-15*A1^2/B1/CHOOSE(MOD(2*CODE(C1)+LEN(C1),11),,4184E5,,,6276E6,1E-4,89876E8,360,56)

0

Желе , 59 байт

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

⁵OÆPḄ%9ị[56,4184ȷ5,8987ȷ9,360,0,6276ȷ6,1ȷ-4]
²÷⁴÷2498ȷ11÷¢⁵

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

Як?

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

⁵OÆPḄ%9ị[...]    - helper link to convert the unit to a hardcoded constant
⁵                - the 3rd input        e.g. "kilotons"
 O               - to ASCII codes       --> [107, 105, 108, 111, 116, 111, 110, 115]
  ÆP             - is prime?            --> [1, 0, 0, 0, 0, 0, 0, 0]
    Ḅ            - binary -> decimal    --> 128
     %9          - modulo 9             --> 2
       ị[...]    - get value from table --> 418400000

²÷⁴÷2498ȷ11÷¢⁵   - main link taking the mass, the radius and the unit
²                - square the mass
 ÷⁴              - divide by the radius
   ÷2498ȷ11      - divide by 2498e11
           ÷¢    - divide by the unit constant, invoking the helper link as a nilad
             ⁵   - append the unit

Посилання помічника дає наступні показники для кожної одиниці:

unit     | ASCII codes                     | is prime?       | bin -> dec | mod 9
---------+---------------------------------+-----------------+------------+------
J        | 74                              | 0               |      0     |   0
kilotons | 107,105,108,111,116,111,110,115 | 1,0,0,0,0,0,0,0 |    128     |   2
nukes    | 110,117,107,101,115             | 0,0,1,1,0       |      6     |   6
twinkies | 116,119,105,110,107,105,101,115 | 0,0,0,0,1,0,1,0 |     10     |   1
kWh      | 107,87,104                      | 1,0,0           |      4     |   4
kg       | 107,103                         | 1,1             |      3     |   3
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.