У Weirdo Incorporates есть странный способ сортировки своих сотрудников по количеству дней, которые они присутствовали в офисе:

  0 -  13 : F  
 14 - 170 : E
171 - 180 : D
181 - 294 : C
295 - 300 : B
301 - 365 : A

Note: The range is inclusive (i.e. 0-13 means 0 days and 13 days both will evaluate
as grade 'F').

Задача:

Напишите программу / функцию, которая выводит / возвращает оценку сотрудника за количество дней [в пределах диапазона от 0 до365], которые посетил сотрудник.

Правила:

• Вы можете использовать ввод как строку или число, но должны выводить как строку / алфавит (вы можете выбрать либо строчные, либо прописные буквы).
• Применяются стандартные лазейки.
• Это код-гольф , поэтому выигрывает самая короткая программа в байтах!

Тестовые случаи:

12  => F
15  => E
301 => A
181 => C

Табло:

var QUESTION_ID=142243,OVERRIDE_USER=8478;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){var F=function(a){return a.lang.replace(/<\/?a.*?>/g,"").toLowerCase()},el=F(e),sl=F(s);return el>sl?1:el<sl?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Желе ,  18 17 15  14 байт

NịØAx“A©r½ɗÇ‘¤

Монадическая ссылка, принимающая число и возвращающая символ.

Попробуйте онлайн! или увидеть все пары ввода-вывода .

Как?

NịØAx“A©r½ɗÇ‘¤ - Link: number, d
N              - negate d
             ¤ - nilad followed by link(s) as a nilad:
  ØA           -   uppercase alphabet yield = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
     “A©r½ɗÇ‘  -   code-page indices = [65,6,114,10,157,14]
    x          -   times = 'A'x65+'B'*6+'C'x114+'D'x10+'E'*157+'F'*14
 ị             - index into (1-indexed & modular - hence the negation to allow all Fs
                                                   to be together at one end)

Javascript (ES6), 51 байт

n=>"ABCDEF"[(n<14)+(n<171)+(n<181)+(n<295)+(n<301)]

Альтернативные решения (дольше):

53 52 байта (-1 байт благодаря @Arnauld)

n=>"FEDCBA"[n>300?5:n>294?4:n>180?3:n>170?2:+(n>13)]

55 53 байта (-2 байта благодаря @Neil)

n=>"AFEDCB"[[14,171,181,295,301].findIndex(m=>n<m)+1]

55 байт

n=>"FEDCBA"[[13,170,180,294,300].filter(m=>n>m).length]

Пример кода:

f=
n=>"ABCDEF"[(n<14)+(n<171)+(n<181)+(n<295)+(n<301)]
console.log(f(12))
console.log(f(15))
console.log(f(301))
console.log(f(181))

TI-Basic, 40 байтов

sub("FEDCBA",sum(Ans≥{0,14,171,181,295,301}),1

J , 31 байт

'FEDCBA'{~13 170 180 294 300&I.

Попробуйте онлайн!

объяснение

'FEDCBA'{~13 170 180 294 300&I.  Input: n
          13 170 180 294 300     Constant array [13, 170, 180, 294, 300]
                            &I.  Use it with interval index to find which of
                                 the intervals (-∞, 13], (13, 170], (170, 180],
                                 (180, 294], (294, 300], (300, ∞) n can be inserted at
        {~                       Index into
'FEDCBA'                         This string and return that char

Python 3 , 50 байт

Спасибо @jferard за -4 байта.

lambda n:chr(70-sum(n>ord(x)for x in"\rª´ĦĬ"))

Попробуйте онлайн!

Python 3 , 54 байта

lambda n:chr(70-sum(n>x for x in[13,170,180,294,300]))

Попробуйте онлайн!

Сохранено 2 байта благодаря @mathmandan и косвенно благодаря @JonathanFrech.

Python 2 , 56 байт

lambda n:"ABCDEF"[sum(n<x for x in[14,171,181,295,301])]

Попробуйте онлайн!

C 62 61 байт

Спасибо @Jonathan Frech за сохранение байта!

f(n){putchar(70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5));}

Попробуйте онлайн!

C 57 байт

#define f(n)70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5)

Попробуйте онлайн!

C (gcc), 54 байта

f(n){n=70-(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5);}

Попробуйте онлайн!

C (gcc), 50 байтов

Используя решение @Herman Lauenstein .

f(n){n=65+(n<14)+(n<171)+(n<181)+(n<295)+(n<301);}

Попробуйте онлайн!

Котлин , 56 байт

{v->'F'-listOf(13,170,180,294,300).filter{it<v}.count()}

Попробуйте онлайн!

украшенный

{ v->
    // Count the grades passed, then subtract that from F
    'F' - listOf(13,170,180,294,300)
            .filter { it < v }
            .count()
}

Тестовое задание

var x:(Int)->Char =
{v->'F'-listOf(13,170,180,294,300).filter{it<v}.count()}

fun main(args: Array<String>) {
    println(x(12))
    println(x(15))
    println(x(301))
    println(x(181))
}

Japt , 23 21 байт

'Gc-[#ªT#´D294L*3]è<U

Попытайся

Explantion

Неявный ввод целого числа U.

'Gc-

Вычесть из кодовых точек (односимвольной) строки G...

è<U

Количество элементов меньше U...

[#ªT#´D294L*3]

В массиве 170 ( #ª), 0 ( T), 180 ( #´), 13 ( D), 294 (литерал) и 300 ( L*3) отформатированы и упорядочены таким образом, чтобы избежать использования запятых с разделителями. 0может быть удален (вычитая из кодовой точки Fвместо), но тогда нужно будет добавить запятую или C*F(12 * 15) использовать для 180, в конечном итоге не экономя байтов.

R , 50 44 байта

LETTERS[6-sum(scan()>c(13,170,180,294,300))]

Попробуйте онлайн!

такой же, как и в ответе javascript, но использует векторизацию R и встроенные LETTERS, чтобы получить немного короче.

Спасибо rturnbull за то, что сбрил последние 6 байтов.

Python 2 , 77 байт

lambda n:chr(70-sorted(_*(n>(0,13,170,180,294,300)[_])for _ in range(6))[-1])

Попробуйте онлайн!

Recursiva , 49 30 байт

Y(++++<a301<a295<a181<a171<a14

Попробуйте онлайн!

Позвольте мне ответить на мой вопрос на моем родном языке. : D

• сэкономили 19 байтов, используя технику из удивительного JS-ответа @Herman Lauenstein

Объяснение:

Y(++++<a301<a295<a181<a171<a14
      <a301<a295<a181<a171<a14 calculate true/false for all the conditions
  ++++                         sum up all the conditions to obtain n which can be either 0,1,2,3,4 or 5
 (                             yield upper-case Alphabet
Y                              Get n-th element   

Perl 5 , 47 + 1 (-p) = 48 байт

$_=((F)x14,(E)x157,(D)x10,(C)x114,(B)x6)[$_]||A

Попробуйте онлайн!

Пайк , 28 байт

G6<13T17*180T30*294]5FhQ>)s@

Попробуй это здесь!

объяснение

G6<13T17*180T30*294]5FhQ>)s@ - Full program. T is the constant for 10.

G                            - The lowercase alphabet.
 6<                          - With the letters after the index 6 trimmed.
   13                        - The literal 13.
     T17*                    - The integer 170, composed by 17 * 10, to save whitespace.
         180                 - The literal 180.
            T30*             - The integer 300, composed by 30 * 10. 
                294          - The literal 294.
                   ]5        - Create a list of 5 elements.
                     FhQ>)   - For each element in the list.
                      h      - Increment.
                       Q     - The input.
                        >    - Is smaller ^^ than ^? Yields 1 for truthy and 0 for falsy.
                         )s  - Close loop and sum.
                           @ - Get the index in the alphabet substring explained above.

Желе , 19 байт

“n-'‘+⁹;“ỌẠÇ‘ð>SịØA

Попробуйте онлайн!

Нижний колонтитул выполняет все тестовые случаи и форматирует вывод.

Pyth, 30 байт

@GtlfgTQmCdc"\r ª ´ & , m"d

Сайт не кажется , чтобы показать символ с кодом пунктом 1, так что вам нужно , чтобы вставить символ с кодом точкой 1 до &, ,и mв конце

(Заменить все 1s символом с кодовой точкой 1):

@GtlfgTQmCdc"\r ª ´ 1& 1, 1m"d

Pyth , 25  26  байтов

@<G6sgRQ[13*17T180*30T294

Проверьте все контрольные примеры.

объяснение

@<G6sgRQ[13*17T180*30T294 - Full program.

  G                       - The lowercase alphabet.
 < 6                      - With the letters after the index 6 trimmed. We will call "S".
        [                 - Initialise a list literal.
         13               - The literal 13.
           *17T           - The integer 170, composed by 17 * 10, so save whitespace.
               180        - The literal 180.
                      294 - The literal 294.
                  *30T    - The integer 300, composed by 30 * 10.
     gRQ                  - For each element, return 1 if is is ≥ the input. 0 otherwise.
    s                     - Sum.
@                         - Get the index into S of ^.
                          - Output implicitly.         

Ly , 74 байта

n(14)L["F"o;]p(171)L["E"o;]p(181)L["D"o;]p(195)L["C"o;]p(301)L["B"o;]"A"o;

Попробуйте онлайн!

Простой подход if-chain. Я сомневаюсь, что это можно сделать намного короче.

Баш , 55 байт

echo obase=16\;10 $[$1<{14,171,181,295,301}]|tr \  +|bc

Попробуйте онлайн или проверьте контрольные примеры .

Java 8, 55 байт

n->n<14?'F':n<171?'E':n<181?'D':n<295?'C':n<301?'B':'A'

Попробуй это здесь.

Альтернатива 57 байтов :

n->(char)(n<14?70:n<171?69:n<181?68:n<295?67:n<301?66:65)

Попробуй это здесь.

Альтернатива 60 байтов :

n->"FEDCBA".charAt(n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5)

Попробуй это здесь.

Возможно, можно найти какую-то формулу, чтобы получить 0-5 более коротким способом, чем n<14?0:n<171?1:n<181?2:n<295?3:n<301?4:5при использовании последнего подхода. Все еще расследую это.

PowerShell , 59 байт

(,'F'*14+,'E'*157+,'D'*10+,'C'*114+,'B'*6+,'A'*65)["$args"]

Попробуйте онлайн!

Аналогично ответу Jelly на Джонатана Аллена в том смысле, что мы создаем массив всех объединенных букв, а затем индексируем в этот массив входные данные $args.

Кролик ~ , 50 байт

(Неконкурентный, вопрос постдатчиков. Я только что закончил переводчик (ура) и хотел попытаться что-то решить. Это также моя первая игра в гольф с кодом)

=>FEDCBA$<({.0-\_-^\-&^?n&&}_}\>\{{\>:.¤})Ð"ỤṅỌrḲA

Это в основном берет различия от одного сорта до следующего 14,157,10,114,6,65 (закодировано как ỤṅỌrḲA ) и вычитает из входных данных. Если найдено отрицательное число, оно останавливается по последовательности 'FEDCBA' и выводит букву.

Небольшое объяснение этого прекрасного фрагмента синтаксиса

Кролик ~ использует сеточную память с одной или несколькими каретками, которые вы можете перемещать; это решение использует 2.

=>FEDCBA$<({.0-\_-^\-&^?n&&}_}\>\{{\>:.¤})Ð"ỤṅỌrḲA - Full program.

  FEDCBA                                           - Load bytes into grid
                                          Ð"ỤṅỌrḲA - Load bytes 14,157,10,114,6,65 into second line of data grid
=                                                  - Read input
 >       <      _ ^   ^     _  >   >               - Move caret (most instructions read from the grid below the active caret)
        $                                          - Create a new caret
          (                              )         - Loop
           {.0             } }   {{     }          - Conditional statement checking if value at caret == 0 then move active caret to next grade else print and quit
              -  -  -                              - Subtract 
               \   \          \ \                  - Cycle active caret
                     &   &&                        - Bitwise and to see if number is negative
                       ?n                          - Get negative sign bit
                                    :.             - Print value at caret as character
                                      ¤            - Terminate program

Excel, 53 байта

Сумма условий, затем возвращает требуемый символ ASCII:

=CHAR((A1<14)+(A1<171)+(A1<181)+(A1<295)+(A1<301)+65)

Альтернативные решения:

Условия суммирования, возвращаемый индекс строки (63 байта):

=MID("ABCDEF",(A1<14)+(A1<171)+(A1<181)+(A1<295)+(A1<301)+1,1)

K (ок) , 30 байтов

Решение:

"FEDCBA"@0 14 171 181 295 301'

Попробуйте онлайн!

Объяснение:

Индекс в правильное ведро:

"FEDCBA"@0 14 171 181 295 301' / the solution
         0 14 171 181 295 301' / bin (') input in a bucket
"FEDCBA"@                      / index (@) into "FEDCBA"

Йотлин , 48 41 байт

{v->'F'-l(13,170,180,294,300).f{a<v}.l()}

Вся программа:

var x:(Int)->Char =
{v->'F'-l(13,170,180,294,300).f{a<v}.l()}

println(x(12))
println(x(15))
println(x(301))
println(x(181))

Портировал мой предыдущий Kotlin ответ здесь .

V , 37 34 байта

aFEDCBA5äh113äh9äh156äh13ähÀ|vyVp

Попробуйте онлайн!

HexDump:

00000000: 3133 4146 1b31 3536 4145 1b39 4144 1b31  13AF.156AE.9AD.1
00000010: 3133 4143 1b35 4142 1b36 3441 411b eec0  13AC.5AB.64AA...
00000020: 7c76 7956 70                             |vyVp

Основная идея:

• Распечатайте FEDCBA, создайте 5 копий B, 113 копий C и т. Д., Получив в результате строкуFFFFFFFFFFFFFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDDDDDDDDDCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCBBBBBA (возможно, есть более эффективный способ сделать это)
• Перейти к nстолбцу th ( nэто первый аргумент), скопировать один символ и заменить на него всю строку.

05AB1E , 19 байтов

•5r¥[‚=€®•3ô›_ASsϤ

Попробуйте онлайн!

Perl 6, 42 39 байт

{chr(65+[+] "\rª´ĦĬ".ords »>»$_)}

Stax , 18 байт

5"«µħĭ",+|oH-VA@]

Запускать и отлаживать онлайн!

объяснение

Количество байтов в CP437.

5"«µħĭ",+|oH-VA@]
5            -        5 minus the result of the following
 "«µħĭ"                   [14, 171, 181, 295, 301]
        ,+                Append input
          |oH             Index of last element if the array were to be sorted
              VA@]    Letter in the alphabet with the given index

C #, 110 байтов

x=>{if(x<14)return"F";if(x<171)return"E";if(x<181)return"D";if(x<295)return"C";if(x<301)return"B";return"A";};

Попробуйте онлайн