Напишите программу или функцию, которая «реагирует» на заданное целое число n (ввод через параметр функции / args / stdin)

Программа не заботится о отрицательных числах, любит четные, не любит нечетные числа и боится числа 13.

Он должен вывести следующее:

если n <0:

 --------------------------
 |                        |
 |                        |
(|      _          _      |)
 |                        |
 |                        |
 |                        |
 |                        |
 |       oooooooooo       |
 |                        |
 |                        |
 |                        |
 --------------------------

если n% 2 == 0 и n> -1:

 --------------------------
 |                        |
 |                        |
(|      ^          ^      |)
 |                        |
 |                        |
 |                        |
 |     o            o     |
 |       oooooooooo       |
 |                        |
 |                        |
 |                        |
 --------------------------

если n% 2 == 1 и n> -1 и n! = 13:

 --------------------------
 |                        |
 |                        |
(|      >          <      |)
 |                        |
 |                        |
 |                        |
 |                        |
 |       oooooooooo       |
 |     o            o     |
 |                        |
 |                        |
 --------------------------

если n == 13:

 --------------------------
 |                        |
 |                        |
(|     (O)        (O)     |)
 |                        |
 |                        |
 |       oooooooooo       |
 |       o        o       |
 |       oooooooooo       |
 |                        |
 |                        |
 |                        |
 --------------------------

Самое короткое решение в байтах побеждает.

CJam - 169

S24*aB*2li_D=3{_0<2{_2%}?}?\;:X"^^<>__":s"(O)"a2*+2/=~6X3=-{S*_@+_,C\-S*2*+@@++}:F~t7'o5*_7F:MtX3={5Mt6'o_7Ft}*X2<{X2*6+'o_5Ft}*{" |"\+'|+}%S'-26*+aa2*\*_3=1>"()"\*3\tN*

Попробуйте это на http://cjam.aditsu.net/

Объяснение высокого уровня:

S24*aB*создает матрицу, полную пробелов, поскольку лицо без ребер
li_D=3{_0<2{_2%}?}?\;:Xсчитывает число и преобразует его в 0 (четное), 1 (нечетное), 2 (отрицательное) или 3 (13), сохраняя его в X,
X"^^<>__":s"(O)"a2*+2/=~выбирает типы глаз (2 strings)
{S*_@+_,C\-S*2*+@@++}:F- функция F принимает 2 строки (скажем, S1, S2) и число (скажем, N) и создает 24-символьную строку, содержащую N пробелов, S2, другие пробелы, S1, N пробелов,
2 (eyes) 6X3=- (F)~tпомещает линию глаз в матрицу,
7'o5*_7F:Mtпомещает общая линия рта в матрице, а также сохраняет ее в M,
X3={5Mt6'o_7Ft}*если X равен 3, он снова помещает M в матрицу, на 2 строки выше, и помещает стороны рта между ними,
X2<{X2*6+'o_5Ft}*если X равен 0 или 1, он помещает углы рта в соответствующая позиция
{" |"\+'|+}%добавляет вертикальные края, а пробел слева в каждой строке
S'-26*+aa2*\*добавляет горизонтальные края,
_3=1>"()"\*3\tдобавляет уши
N* добавляет разделители новой строки

Рубин, 241 224

f=->n{s=" #{?-*26}
"
s+=" |#{' '*24}|
"*11+s
s[84]=?(
s[110]+=?)
s[233,12]=m=?O*12
s[91,3]=s[102,3]=n<0?' _ ':n==13?(s[177,12]=m;s[205]=s[216]=?O;'(O)'):(s[203+d=n%2*56]=s[218+d]=?O;" #{n%2<1??^:b=?>} ")
s[103]=?<if b
$><<s}

Это определяет функцию для вызова как f[13]. Я уверен , что есть много возможностей для улучшения, похоже , что Ventero помогли мне сделать здесь .

По сути, сначала я строю грубую основу, а также прикрепляю уши и рот. Затем я ставлю глаза в зависимости от количества. Разрабатывая символы для глаз, я также забочусь о разных ртах, поэтому мне не нужно снова проверять тип номера. Наконец, мне нужно исправить правый глаз для нечетных чисел, потому что код выше помещает одну и ту же строку в оба глаза.

C # - 349 байт

Конечно, не собираюсь выигрывать какие-либо награды, но это другой способ ведения дел.

Golfed:

class P{static void Main(string[]A){int j=64,i,r=0,n=int.Parse(A[0]);for(var f=(n<0?"IDID-TDTD-":n==13?"HDHD(IDIDOJDJD)SDSD(TDTDOUDUD)KIRI JHSJo":n%2<1?"IDID^TDTD^HIHIoUIUIo":"IDID>TDTD<HKHKoUKUKo")+@"JJSJoCBZM BB[M|BA[N-ADAD(\D\D)AA\N AA]N"+"\n";j++<78;)for(i=64;i++<93;System.Console.Write(f[r]))for(r=0;f[r++]>i|f[r++]>j|i>f[r++]|j>f[r++];r++);}}

Меньше гольфа:

class P
{
    static void Main(string[]A)
    {
        int j=64,i,r=0,n=int.Parse(A[0]); // everything is offset by 65 in this program

        for(
            var f=(n<0?"IDID-TDTD-": // this string describes a set of rectangles (x1,y1,x2,y2,ch)
                n==13?"HDHD(IDIDOJDJD)SDSD(TDTDOUDUD)KIRI JHSJo":
                n%2<1?"IDID^TDTD^HIHIoUIUIo":
                "IDID>TDTD<HKHKoUKUKo"
                )+@"JJSJoCBZM BB[M|BA[N-ADAD(\D\D)AA\N AA]N"+"\n";

            j++<78;) // the loop then prints the rectangles to the screen
            for(i=64;i++<93;System.Console.Write(f[r]))
                for(r=0;f[r++]>i|f[r++]>j|i>f[r++]|j>f[r++];r++);
    }
}

Python 2 - 255

Не очень коротко, но я все равно выложу:

n=input()
o='o'
S='  '
w=y=7*S
b=' '+'-'*26+'\n'
p=' |%19s     |\n'
E=p%y*2
v=S+o*10+S
u=z=o+6*S+o
A=a='^ '
if n%2:A='< ';a='> ';u=y;w=z
if n<0:A=a='_ ';u=w=y
if n==13:A=a='(O)';u=w=v;v=S+o+S*4+o+S
print b+E+'(|%8s%11s     |)\n'%(a,A)+E+p%u+p%v+p%w+E+b

Я пропускаю назначение элементов для строк в Python! :( Тогда можно начать с матрицы символов и просто изменить глаза и рот.

Python 2, 257

Не победитель, а альтернативный подход, довольно близко! Я надеюсь, что смогу выжать еще несколько символов из этого. Создает все строки по частям, используя общие подстроки, чтобы действительно выжать байты.

X,Z=R=" |"
Q=X*5
Y=X*7
A=X+"-"*26
B=R+X*24+Z
n=input()
a,b,c,d,e,f,g=((("^>^<o  o "+Q)[n%2::2],"OO  ()o")[n==13],"__"+Q)[n<0]
for F in(A,B,B,"(|"+Q+e+a+f+Y+X+e+b+f+Q+"|)",B,B,R+Y+g*10+Y+Z,R+Q+c+X+g+Y+X+g+X+c+Q+Z,R+Y+"o"*10+Y+Z,R+Q+d+Y+Q+d+Q+Z,B,B,A):print F

CJam, 202

[S'-26*N]:Z[S'|:PS24*PN]:RR'(PS5*qi:XD=X0<-X2%2*+:Y[" ^ "_" > ""(O)"" - "__]=S8*Y[" ^ ""   "" < ""(O)"" - "__]=S5*P')NRRXD=[SPS7*'oA*S7*PN]:QR?Y[[SPS5*'oSC*'oS5*PN]:T_R[SPS7*'oS8*'oS7*PN]RRR]=QY2=TR?RRZ