Сейчас пятница, и я устал, так что давайте сделаем быстрый! Не принимайте никаких данных, однако вы должны вывести все тринадцать пронумерованных карт в стандартной колоде карт. Вы должны вывести 2 через Ace (Suit agnostic).

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

Второй ряд сверху обозначен а /и десятью пробелами и\

Третий ряд такой же, как и во всех средних строках, кроме символов (символов), обозначающих значение карты, которые появляются на два пробела справа (если вверху) или на два пробела слева (если внизу) от края.

Каждый средний ряд - это простая |и десять пробелов и еще один|

Наконец, последняя строка - это \и десять, _и, наконец,/

Если значение многозначное, общая ширина по высоте карты не должна изменяться. (т. е. 10 не сделает боковые стороны карты шире)

Пример короля:

 __________ 
/          \
| K        |
|          |
|          |
|          |
|          |
|          |
|        K |
\__________/

9 Пример

 __________ 
/          \
| 9        |
|          |
|          |
|          |
|          |
|          |
|        9 |
\__________/

10 Пример

 __________ 
/          \
| 10       |
|          |
|          |
|          |
|          |
|          |
|       10 |
\__________/

Выведите их в порядке от наименьшего к наибольшему (тузы высокие!).

Это код-гольф, поэтому выигрывает самый короткий код.

Веселитесь и веселых выходных!

PowerShell v2 +, 120 116 114 108 байт

2..10+[char[]]'JQKA'|%{$z=' '*(8-!($_-10));$x='_'*10;$y=' '*10;" $x 
/$y\
| $_$z|";,"|$y|"*5;"|$z$_ |
\$x/"}

Создает диапазон 2..10и объединяет массив сchar -array JQKA. Подает это в цикл |%{...}. Каждая итерация, положит $zравную соответствующее число пробелов (на основе ли мы на карте 10или нет), набор $xдля 10подчеркивания и множество $yв 10пространства.

Затем мы начинаем наши размещения. Мы собираемся использовать по умолчаниюWrite-Output по для вставки новой строки между элементами конвейера, поэтому нам просто нужно получить материал в конвейере. Обратите внимание, что в большинстве мест мы используем буквальный символ новой строки, а не закрываем и открываем наши строки, чтобы сохранить пару байтов.

Первый - просто $xс двумя пробелами, затем $yс двумя косыми чертами, затем | $_$z|"с трубкой, пробелом, соответствующим количеством пробелов и другой трубой. Это формирует вершину карт вплоть до линии стоимости.

Здесь мы должны ставить точку с запятой, так как следующий использует массив. ,"|$y|"*5Создает строковый массив с запятой-оператором, труб с пробелами - на выходе, каждый элемент этого массива получает новую строку бесплатно.

Затем "|$z$_ |для маркировки нижнего значения и, наконец, $xс косой чертой для нижней части карты.

Выходной фрагмент

PS C:\Tools\Scripts\golfing> 2..10+[char[]]'JQKA'|%{$z=' '*(8,7)[$_-eq10];" $(($x='_'*10)) ";"/$(($y=' '*10))\";"| $_$z|";,"|$y|"*5;"|$z$_ |";"\$x/"}
 __________ 
/          \
| 2        |
|          |
|          |
|          |
|          |
|          |
|        2 |
\__________/
 __________ 
/          \
| 3        |
|          |
|          |
|          |
|          |
|          |
|        3 |
\__________/
 __________ 
/          \
| 4        |
...

Питон, 161 160 156 149 байт

Один байт спас Шебанг

Это может использовать некоторую работу, но вот оно:

o=" ";v="_"*10
for x in map(str,range(2,11)+list("JKQA")):print o+v+"\n/",o*9+"\\\n|",x.ljust(8),"|"+("\n|"+o*10+"|")*5+"\n|",o*6+x.ljust(3)+"|\n\\"+v+"/"

объяснение

Составляем список всех рангов по порядку, используя map(str,range(2,11). Затем мы проходим через все ряды и делаем карту.

print o+"_"*10+"\n/",o*9+"\\\n|",x.ljust(8),"|"+("\n|"+o*10+"|")*5+"\n|",o*6+x.ljust(3)+"|\n\\"+"_"*10+"/"

Мы делаем верх карты:

o+v+"\n"

Тогда звание идет слева:

"/",o*9+"\\\n|",x.ljust(8),"|"

Мы используем, .ljustпотому что 10это два длинных и все остальные один широкий.

Затем мы печатаем 5 строк в середине:

"|"+("\n|"+o*10+"|")*5+"\n|"

и нижний ранг:

"\n|",o*6+x.ljust(3)+"|\n"

Наконец мы печатаем нижнюю часть карты:

"\\"+v+"/"

JavaScript (ES6), 151 байт

f=
_=>`2345678910JQKA`.replace(/.0?/g,s=>` __________
/          \\
| `+(s+=`   `+s).slice(0,4)+`     |
|     `.repeat(6)+s.slice(-4)+` |
\\__________/
`)
;
document.write('<pre>'+f());

Perl 128 117 111 байт

map{printf$"."_"x10 ."
/".$"x10 .'\
| %-9s|
'.("|".$"x10 ."|
")x5 ."|%9s |
\\"."_"x10 ."/
",$_,$_}2..10,J,Q,K,A

Шесть буквенных символов новой строки сохраняют 1 байт каждый. Это не может быть запущено непосредственно из командной строки из-за одинарных кавычек в строках 2 и 4 , чтобы сэкономить 1 байт, избегая обратной косой черты.

Изменить: я поставил Ace в начале, но это должно быть в конце. Это не меняет количество байтов.

Редактировать 2: -11 байт: избавился от некоторых ненужных утверждений и добавил еще один буквальный перевод строки. Теперь все выводится через один printf.

Редактируйте 3: -5 байт благодаря @Ton Hospel. Но по какой-то причине я получаю 111 байт вместо 112 по сравнению с работой на дому, поэтому я использую количество байтов, которое мне дает домашний компьютер.

PHP, 233 байта

foreach([2,3,4,5,6,7,8,9,10,J,Q,K,A]as$k){for($c="",$i=0;$i<10;$i++)$c.=str_pad($i?$i>1&$i<9?"|":($i<2?"/":"\\"):" ",11,$i%9?" ":_).($i?$i>1&$i<9?"|":($i<2?"\\":"/"):" ")."\n";$c[113]=$c[28]=$k;$k>9&&$c[29]=$c[113]=0&$c[112]=1;echo$c;}

///, 182 180 байт

/+/_____//*/# |
&//&/@@@@@|# //%/ |
\\\\++\\\/
//$/ ++
\\\/!\\\\
| //#/       //!/#   //@/|!|
/$2*2%$3*3%$4*4%$5*5%$6*6%$7*7%$8*8%$9*9%$10#|
@@@@@|#10 |
\\++\/
$J*J%$K*K%$Q*Q%$A*A%

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

-2 байта благодаря m-chrzan

Python 3.5, 110 байт

u='_'*10
for c in[*range(2,11),*'JQKA']:print(' %s\n/%%11s\n'%u%'\\'+'| %-6s%2s |\n'*7%(c,*' '*12,c)+'\%s/'%u)

Печать

• Две верхние строчки ' %s\n/%%11s\n'%u%'\\' , где uнаходится'_'*10
• Средние 7 строк '| %-2s %2s |\n' , каждая из которых имеет два слота форматирования строк. Первый и последний заполнены значением карты, а остальные с пробелами без эффекта
• Нижняя строка '\% s /'% u

Новые функции распаковки в Python 3.5 используются в двух местах. Список меток [*range(2,11),*'JQKA']распаковывает цифры и буквы в один список. И кортеж (c,*' '*12,c)распаковывает двенадцать записей пробелов в центр.

Scala, 161 байт

val a=" "*7
val u="_"*10
((2 to 10)++"JQKA")map(_+"")map{x=>val p=" "*(2-x.size)
s" $u \n/$a   \\\n| $x$p$a|\n" + s"|$a   |\n" * 5 + s"|$a$p$x |\n\\$u/\n"}

Пакет, 236 байт

@echo off
for %%v in (2 3 4 5 6 7 8 9 10 J Q K A)do call:v %%v
exit/b
:v
set s=%1       %1
echo  __________
echo /          \
echo ^| %s:~0,8% ^|
for /l %%l in (1,1,5)do echo ^|          ^|
echo ^| %s:~-8% ^|
echo \__________/

Я пробовал играть в гольф тремя разными способами, но каждый раз получал одинаковое количество байтов ...

05AB1E , 71 70 68 66 65 64 байта

Использует кодировку CP-1252 .

TL¦"JQKA"S«vð'_TשððT×…/ÿ\9yg-ð×y"| ÿÿ|"ÂðT×…|ÿ|5×sT‡®…\ÿ/JTä»,

Слегка измененная ссылка, так как …не работает с ÿбанкоматом TIO.

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

объяснение

TL¦"JQKA"S« толкает список [2,3,4,5,6,7,8,9,10,J,Q,K,A]

Затем мы перебираем каждое значение карты с помощью v

ð'_Tשðconstructs " __________ "
ðT×…/ÿ\constructs "/ \"
9yg-ð×y"| ÿÿ|"Âконструкции 2 строки со значениями карты (вторая строка является первой перевернутой)
ðT×…|ÿ|5×создает 5 строк вида"| |"

Тогда мы

s     # move the 2nd card value row after the 5 "middle rows"
 T‡  # and replace 1 with 0 and vice versa

®…\ÿ/ строит нижний ряд

J       # join everything into 1 string
 Tä     # split into 10 parts
   »,   # merge by newline and print with newline

V , 87 байт

i ±_ 
/± \Ypr|$.Y6P3|r2Lhhr2o\±_/
H8ñy}GP2j6j? _ñ2j$X6jxG"04p/9
rJn.nrQn,nrKn.nrAn.

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

Так как он содержит некоторые непечатаемые, вот hexdump:

0000000: 6920 b15f 200a 2fb1 205c 1b59 7072 7c24  i ._ ./. \.Ypr|$
0000010: 2e59 3650 337c 7232 4c68 6872 326f 5cb1  .Y6P3|r2Lhhr2o\.
0000020: 5f2f 0a1b 4838 f179 7d47 5032 6a01 366a  _/..H8.y}GP2j.6j
0000030: 013f 205f f132 6a24 5836 6a78 4722 3034  .? _.2j$X6jxG"04
0000040: 702f 390a 724a 6e2e 6e72 516e 2c6e 724b  p/9.rJn.nrQn,nrK
0000050: 6e2e 6e72 416e 2e                        n.nrAn.

PHP, 135 131 158 134 байта

Надеюсь, я найду способ сократить это немного больше.

foreach([2,3,4,5,6,7,8,9,10,J,Q,K,A]as$C)printf(" %'_9s
/%12s| %-8s|%s
|%8s |
\\%'_9s/
",_,'\
',$C,str_repeat('
|         |',5),$C,_);

Это позволяет printfповторять несколько символов и форматировать все красиво.

Старая версия:

Не совсем кусок красоты, но работает!

$L=__________;$S='        ';foreach([2,3,4,5,6,7,8,9,10,J,Q,K,A]as$C)echo" $L
/  $S\
| $C".($P=substr($S,$C>9))."|
",str_repeat("|  $S|
",5),"|$P$C |
\\$L/
";

Спасибо Jörg Hülsermann за обнаружение ошибки и за то, что позволил мне использовать часть его кода, которая уменьшила его на 4 байта! И для нахождения фатальной ошибки.

Рубин, 115 байт

Довольно прямолинейное использование printf.

([*(?2.."10")]+%w{J Q K A}).map{|e|printf" #{u=?_*10} 
/%11s
| %-9s|
#{(?|+' '*10+"|
")*5}|%9s |
\\#{u}/
",?\\,e,e}

Ракетка 327 байт

(let*((ms make-string)(p #\space)(e? equal?)(sa string-append)(f(λ(s)(display(sa" "(ms 10 #\_)" \n""/"(ms 10 p)"\\\n""| "s
(ms(if(e? s"10")7 8)p)"|\n"(apply sa(for/list((i 6))"|          |\n"))"| "(ms(if(e? s"10")6 7)p)s" |\n"
"\\"(ms 10 #\_)"/\n")))))(for((i(range 2 11)))(f(number->string i)))(for((i'("J""Q""K""A")))(f i)))

Ungolfed:

(define (main)
(let* ((ms make-string)
       (e? equal?)
       (sa string-append)
      (f(lambda(s)
  (display
   (sa
    " "
    (ms 10 #\_)
    " \n"
    "/"
    (ms 10 #\space)
    "\\\n"
    "| " s   (ms (if(e? s "10") 7 8) #\space)   "|\n"
    (apply sa (for/list ((i 6)) "|          |\n"))
    "| "  (ms (if(e? s "10") 6 7) #\space)  s " |\n"
    "\\" (ms 10 #\_) "/\n")
   ))))
(for ((i(range 2 11)))
  (f (number->string i)))
(for ((i '("J" "Q" "K" "A")))
  (f i))
))

Тестирование:

(main)

Выход:

 __________ 
/          \
| 2        |
|          |
|          |
|          |
|          |
|          |
|          |
|        2 |
\__________/
 __________ 
/          \
| 3        |
|          |
|          |
|          |
|          |
|          |
|          |
|        3 |
\__________/
 __________ 
/          \
| 4        |
|          |
|          |
|          |
|          |
|          |
|          |
|        4 |
\__________/
 __________ 
/          \
| 5        |
|          |
|          |
|          |
|          |
|          |
|          |
|        5 |
\__________/
 __________ 
/          \
| 6        |
|          |
|          |
|          |
|          |
|          |
|          |
|        6 |
\__________/
 __________ 
/          \
| 7        |
|          |
|          |
|          |
|          |
|          |
|          |
|        7 |
\__________/
 __________ 
/          \
| 8        |
|          |
|          |
|          |
|          |
|          |
|          |
|        8 |
\__________/
 __________ 
/          \
| 9        |
|          |
|          |
|          |
|          |
|          |
|          |
|        9 |
\__________/
 __________ 
/          \
| 10       |
|          |
|          |
|          |
|          |
|          |
|          |
|       10 |
\__________/
 __________ 
/          \
| J        |
|          |
|          |
|          |
|          |
|          |
|          |
|        J |
\__________/
 __________ 
/          \
| Q        |
|          |
|          |
|          |
|          |
|          |
|          |
|        Q |
\__________/
 __________ 
/          \
| K        |
|          |
|          |
|          |
|          |
|          |
|          |
|        K |
\__________/
 __________ 
/          \
| A        |
|          |
|          |
|          |
|          |
|          |
|          |
|        A |
\__________/

Java 7, 287 байт

String c(){String r="",l="__________",c=(" "+l+" \n/s\\\n| z       |\nxxxxxx|       y|\n\\"+l+"/\n").replace("x","|s|\n").replace("s","          ");for(int i=0;i++<13;r+=c.replace("z",i==10?"10":(l=i<2?"A ":i>12?"K ":i>11?"Q ":i>10?"J ":i+" ")).replace("y",i==10?"10 ":" "+l));return r;}

Ладно, это некрасиво и не очень эффективно, но это работает .. Это 10как особый случай с пробелом до вверху и после в нижней позиции действительно винтики со всеми ..

Ungolfed & тестовый код:

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

class M{
  static String c(){
    String r = "",
           l = "__________",
           c = (" " + l + " \n/s\\\n| z       |\nxxxxxx|       y|\n\\" + l + "/\n")
                 .replace("x", "|s|\n")
                 .replace("s", "          ");
    for(int i = 0; i++ < 13; r += c
        .replace("z", i == 10
                       ? "10"
                       : (l = i < 2
                               ? "A "
                               : i > 12
                                  ? "K "
                                  : i > 11
                                     ? "Q "
                                     : i > 10
                                        ? "J "
                                        : i+" "))
        .replace("y", i == 10
                       ? "10 "
                       : " "+l));
    return r;
  }

  public static void main(String[] a){
    System.out.println(c());
  }
}

Выход:

 __________ 
/          \
| A        |
|          |
|          |
|          |
|          |
|          |
|          |
|        A |
\__________/
 __________ 
/          \
| 2        |
|          |
|          |
|          |
|          |
|          |
|          |
|        2 |
\__________/
 __________ 
/          \
| 3        |
|          |
|          |
|          |
|          |
|          |
|          |
|        3 |
\__________/
 __________ 
/          \
| 4        |
|          |
|          |
|          |
|          |
|          |
|          |
|        4 |
\__________/
 __________ 
/          \
| 5        |
|          |
|          |
|          |
|          |
|          |
|          |
|        5 |
\__________/
 __________ 
/          \
| 6        |
|          |
|          |
|          |
|          |
|          |
|          |
|        6 |
\__________/
 __________ 
/          \
| 7        |
|          |
|          |
|          |
|          |
|          |
|          |
|        7 |
\__________/
 __________ 
/          \
| 8        |
|          |
|          |
|          |
|          |
|          |
|          |
|        8 |
\__________/
 __________ 
/          \
| 9        |
|          |
|          |
|          |
|          |
|          |
|          |
|        9 |
\__________/
 __________ 
/          \
| 10       |
|          |
|          |
|          |
|          |
|          |
|          |
|       10 |
\__________/
 __________ 
/          \
| J        |
|          |
|          |
|          |
|          |
|          |
|          |
|        J |
\__________/
 __________ 
/          \
| Q        |
|          |
|          |
|          |
|          |
|          |
|          |
|        Q |
\__________/
 __________ 
/          \
| K        |
|          |
|          |
|          |
|          |
|          |
|          |
|        K |
\__________/

R 175 байт

for(x in c(2:10,"J","Q","K","A")){r=c("|"," ",x,rep(" ",9-nchar(x)),"|");cat(" __________ \n/          \\\n",r,"\n",rep("|          |\n",5),rev(r),"\n\\__________/\n",sep="")}

Довольно конкурентоспособный ответ на этот раз на R для задачи ascii-art и определенно должен быть пригоден для игры в гольф.

Попробуйте это на R-скрипке

Разгромил и объяснил

for(x in c(2:10,"J","Q","K","A")){          # For each card in vector 1,...,10,J,Q,K,A
    r=c("|"," ",x,rep(" ",9-nchar(x)),"|")  # Create variable for 3rd row called "r".
    ;cat(" __________ \n/          \\\n",   # Print: hardcoded top two rows,
    r,"\n",                                 # 3rd row,
    rep("|          |\n",5),                # Repeat middle section 5 times,
    rev(r),                                 # Reversed 3rd row,
    "\n\\__________/\n",                    # Hardcoded bottom row
    sep="")                                 # Set separator to empty string
}

Наиболее интересным аспектом, где сохраняются несколько байтов, является назначение третьей строки:

r=c("|"," ",x,rep(" ",9-nchar(x)),"|")

Поскольку 8между символом, обозначающим ценность карты, и итоговым |(кроме 10) есть пробелы, мы можем повторить9 пробелы и вычесть количество символов в текущей напечатанной карте.

Сохраняя каждый символ в 3rdстроке как свой собственный элемент в строковом векторе, rмы можем обратить вектор и использовать его для 9thстроки.

C #, 385 байт

Мой первый вызов ASCII Art - это было весело!

Golfed:

string D(){var d=new string[15];for(int i=2;i<15;i++){var a=i>10?new Dictionary<int,string>(){{ 11,"J"},{12,"Q"},{13,"K"},{14,"A"},}[i]:i+"";var r="|          |";d[i]=string.Join("\n",new string[]{" __________",@"/          \",a.Length>1?"| "+a+"       |":"| "+a+"        |",r,r,r,r,r,a.Length>1?"|       " + a +" |" : "|        "+a+" |",@"\__________/"});}return string.Join("\n",d);}

Ungolfed:

public string D()
{
  var d = new string[15];

  for (int i = 2; i < 15; i++)
  {
    var a = i > 10 ? new Dictionary<int, string>() {
    { 11, "J" },
    { 12, "Q" },
    { 13, "K" },
    { 14, "A" },
    }[i] 
      : i+"";

    var r = "|          |";

    d[i] = string.Join("\n", new string[] {
      " __________",
      @"/          \",
      a.Length > 1 ? "| " + a + "       |" : "| " + a + "        |",
      r,
      r,
      r,
      r,
      r,
      a.Length > 1 ? "|       " + a +" |" : "|        " + a +" |",
      @"\__________/"});
  }

  return string.Join("\n", d);
}

На самом деле , 91 байт

"JQKA"#9⌐2x+`;k' ;'_9u*@++'\' 9u*'/++"| {:<9}|"5'|;' 9u*@++n"|{:>9} |"'/'_9u*'\++kp@'
jf`Mi

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

объяснение

Часть 1: настройка списка номиналов:

"JQKA"#9⌐2x+`PART 2 CODE`Mi
       9⌐2x                  range(2,11) ([2, 10])
"JQKA"#    +                 extend with ["J", "Q", "K", "A"]
            `PART 2 CODE`M   do Part 2 for each item in list
                          i  flatten resulting list and implicitly print

Часть 2: создание карточек (новая строка заменена \nна удобочитаемость):

;k' ;'_9u*@++'\' 9u*'/++"| {:<9}|"5'|;' 9u*@++n"|{:>9} |"'/'_9u*'\++kp@'\njf
;k                                                                            duplicate the face value, push both copies to a list
  ' ;'_9u*@++                                                                 construct the top line
             '\' 9u*'/++                                                      construct the second line
                        "| {:<9}|"                                            create a format string to place the value in a left-aligned 9-width field in the top left of the card, one space away from the edge
                                  5'|;' 9u*@++n                               create 5 copies of the blank middle section
                                               "|{:>9} |"                     like before, but right-align the face value
                                                         '/'_9u*'/++          construct the bottom of the card
                                                                    kp@'\nj   push entire stack to a list, pop the list containing the face values out of that list, and join the rest (the card strings) with newlines
                                                                           f  format the card with the face values