Приміщення:

Ваша репутація є у формі Stack-Exchange, якщо її можна представити, розклавши підрахунки медалей (золото, срібло та бронзу окремо) на основні 10 цифр та з'єднавши їх у будь-якому заданому порядку з кількома застереженнями.

Поки розкладаються, кожен

• Розмір золотої медалі коштує три цифри.
• Срібло коштує дві цифри.
• Бронза - це одна цифра.
• Крім того, оскільки SE не відображає тип медалі, якщо у вас її немає, підрахунок 0 медалей за тип не дасть а [0].

Приклад:

• [1 Gold, 2 Silvers, 3 Bronzes]розкладається на [1,1,1,2,2,3]. 321112 та 213121 - два приклади номера SE-форми для цих медалей.
• [20 Golds, 0 Silvers, 20 Bronzes]розкладається на [2,2,2,0,0,0,2,0]. 20002022 - номер у формі SE.
• [11 Golds, 0 Silvers, 0 Bronzes]розкладається на [1,1,1,1,1,1]. 111111 - це єдиний номер форми SE для цього.

Не буде провідних 0, якщо розглядати номер SE. Наприклад, у другому прикладі вище, 00002222 -> 2222це не вважатиметься числом форми SE [20,0,20].

Введення-виведення:

Вхід - це список / кортеж / масив / що б не було з [reputation, gold_medals, silver_medals, bronze_medals]усіх негативних чисел. Це припущений порядок, але його можна змінити. Просто зробіть замітку у своїй відповіді, якщо це зробити.

Вихід - це будь-які два послідовних значення для істинного та хибного.

Правила:

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

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

#[Rep, Gold, Silver, Bronze] -> Output
[4, 0, 0, 4]       -> True
[1447, 0, 4, 17]   -> True
[74414, 4, 0, 17]  -> True
[4444, 4, 0, 4]    -> True
[4455, 0, 54, 0]   -> True
[5355, 5, 0, 3]    -> True
[53535, 5, 3, 0]   -> True
[4444, 0, 0, 4444] -> True
[444, 4, 0, 0]     -> True
[1234, 0, 0, 1234] -> True
[1234, 0, 0, 4321] -> True

[4444, 1, 0, 1]      -> False
[5555, 5, 0, 55]     -> False
[1234, 1, 23, 4]     -> False
[1, 0, 0, 0]         -> False
[1001001, 0, 10, 10] -> False

05AB1E , 16 14 13 11 10 байт

∞×0KJ‚€{íË

Приймає медалі, введені в порядку, [bronze, silver, gold]як перший вхід і reputationяк другий.

-1 байт завдяки @Grimy .

Спробуйте в Інтернеті або перевірте всі тестові випадки .

Пояснення:

∞           # Push an infinite positive list: [1,2,3,...]
 ×          # Repeat the values in the (implicit) input-list that many times as string
            # (since the input-list contains just 3 values, the rest of the infinite
            #  list is ignored)
  0K        # Remove all 0s (so all "0", "00" and "000")
    J       # Join the strings in the list together
     ‚      # Pair this string with the (implicit) second input
      €{í   # Sort the digits in both strings in descending order
         Ë  # And check if both are now equal
            # (after which the result is output implicitly as result)

JavaScript (ES6),  92  74 байт

Вводиться як " (['gold','silver','bronze'])('rep'). Повертає булеве значення.

b=>r=>[...b.map((n,i)=>n.repeat(+n&&3-i)).join``].sort()+''==[...r].sort()

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

JavaScript (ES6), 74 байти

Вводиться як " (gold, silver, bronze, 'rep'). Повертає булеве значення.

(g,s,b,r)=>(F=s=>[...s].sort()+0)(r)==F([g,g,g,s,s,b].filter(x=>x).join``)

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

MATL , 28 байт 20 байт 16 байт 13 байт

Повертає 0 для помилкових та 1 для істинних. Це, безумовно, можна пограти в гольф.

[1,3,2,1]Y"t2:7)XzVXzY@Ums0>

До 16 байт, якщо оцінка репутації можна взяти окремо, а порядок [бронза, срібло, золото], репутація
Вниз до 13 байт завдяки Луїсу Мендо

3:Y"XzVXzY@Um

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

Рубін , 69 байт

->r,g,s,b{([g,g,g,s,s,b]-[0]).flat_map(&:digits).sort==r.digits.sort}

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

J , ^{38 34} 31 байт

-:&(/:~)&":3 2 1;@#*#&.><@":"0 

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

Japt , 14 13 12 байт

íp fn ¬á øUg

Вводиться як " [rep, bronze, silver, gold]

Спробуйте або Перевірте всі тестові випадки

Sample input: U = [1447, 17, 4, 0]
íp            Repeats each value of U by it's index amount e.g. ["","17","44","000"]
  fn          Remove all falsy values when converted to a number e.g. ["17","44"]
    ¬         Concatenate e.g. "1744"
     á        All permutations e.g. ["1744","1744","1474","1447","1474","1447","7144","7144","7414","7441","7414","7441","4174","4147","4714","4741","4417","4471","4174","4147","4714","4741","4417","4471"]
      øUg     Does it contain the first item of the input? 

Сітківка 0,8,2 , 45 байт

,0
,
,(\d*),(\d*),
¶$1$1$1$2$2
%O`.
^(.+)¶\1$

Спробуйте в Інтернеті! Посилання включає тестовий набір. Пояснення:

,0
,

Видалити нульові бали.

,(\d*),(\d*),
¶$1$1$1$2$2

Розгорніть золото і срібло та перетворіть роздільник на новий рядок.

%O`.

Сортуйте репутацію та розширені оцінки окремо.

^(.+)¶\1$

Порівняйте відсортовані цифри.

Желе , 10 байт

xJ$¹ƇV,Ṣ€E

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

Аргумент 1: [Bronze, Silver, Gold]
Аргумент 2:Rep

Ракетка, 149 107 98 байт

(λ(r b s g[h(λ x(sort(string->list(apply ~a(remq*'(0)x)))char<?))])(equal?(h r)(h b s s g g g)))

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

Перший раз займався гольфом у Ракетці, тому все ще шукає покращення ...

Пояснення (оригінальної більш тривалої версії, але та сама ідея):

(λ(r b                              ; take rep and badges as arguments
     [g(λ(x)                        ; helper function g which takes a string
         (sort                      ; and returns the sorted
           (string->list x)         ; list of characters
           char<?))])               ; (sort by ascii code)
  (equal?                           ; compare...
    (g(~a r))                       ; g called on the rep converted to string
    (g                              ; and g called on...
      (string-join                  ; the concatenation of
        (map ~a                     ; the stringified elements of
             (append*               ; the flattened list given by
               (filter              ; the elements of the following list where
                 (λ(x)(>(car x)0))  ; the badge count is nonzero:
                 (map make-list     ; repeat the badge counts
                      '(1 2 3)b)))) ; 1, 2, and 3 times respectively
        ""))))

Деревне вугілля , 24 байти

1Ｆ⁴Ｆ↨ＮχＦι⊞υκＦχ¿⁻№υι№θＩι⎚

Спробуйте в Інтернеті!Посилання на багатослівну версію коду. Приймає вхід в порядку замовлення, бронзи, срібла, золота та виходів1 якщо повтор дійсний. Пояснення:

1

Припустимо, що представник діє.

Ｆ⁴Ｆ↨ＮχＦι⊞υκ

Переведіть петлю на чотири вхідні значення. Натисніть кожну цифру кожного значення iразів, де iзнаходиться 0-індексований індекс значення. Числове базове перетворення тут використовується як перетворення0 в порожній масив.

Ｆχ¿⁻№υι№θＩι⎚

Перевірте кількість кожної цифри у масиві, що відповідає першому вводу. Якщо вони відрізняються, очистіть полотно.

Желе , 18 байт

DẋṠƊ€ẋ"3RU¤FṢ⁼⁴DṢ¤

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

це трохи погано

Python 2 , 80 79 77 68 байт

lambda r,g,s,b:S((g>0)*3*`g`+(s>0)*2*`s`+(b>0)*`b`)==S(`r`)
S=sorted

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

Вводиться як " rep, gold, silver, bronze.

Perl 5 -lF , 62 байти

map{@r=sort/./g,@r if($_=<>x$_)>0}1..3;@F=sort@F;say"@r"eq"@F"

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

Вводить дані на окремих рядках як

reputation
bronze
silver
gold