Цей виклик є простим мистецтвом ascii-art . Давши два входи, що описують висоту та ширину лего, ви маєте друк ASCII художнього зображення цього зображення.

Ось як повинні виглядати шматки Lego:

(4, 2)

___________
| o o o o |
| o o o o |
-----------

(8, 2)

___________________
| o o o o o o o o |
| o o o o o o o o |
-------------------

(4, 4)

___________
| o o o o |
| o o o o |
| o o o o |
| o o o o |
-----------

(3, 2)

_________
| o o o |
| o o o |
---------

(1, 1)

o

Якщо ви не можете сказати з тестових випадків, верх і низ - це width*2+3підкреслення та тире, і в кожному ряду є труби для боків, oдля дрібниць, і все розділено пробілами.

Єдиним винятком для цього є те (1, 1), що є лише одиничним o.

Ви ніколи не отримаєте 0жодного з вимірів.

Це код-гольф , тому найкоротший код у байтах виграє!

var QUESTION_ID=84050,OVERRIDE_USER=31343;function answersUrl(e){return"http://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"http://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){return e.lang>s.lang?1:e.lang<s.lang?-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>

Befunge , 165 227 байт

&::&*:1` v
v+3*2:\/\_"o",@
v       _$ v<
>"_",1-:^  2
v:,,"| ",*5<
v         _v
>" o",,1-:^$
>*v>\     #\^
5 #|:-1,"|"<
^2$<
v1, *95<
- >2*3+^
>:    #^_@

Не стільки пробілів, як раніше, але все ж є прогалини. Принцип такий же, як і в попередньому рішенні, але макет інший. Цього разу, щоб перевірити, чи є обидва числа 1, я просто беру їхній продукт і бачу, чи результат більший за 1.

Старе рішення (227 байт)

v           v       <
&   >>\:2*3+>"_",1-:|
>&:1`|v ,,"| ",*52:$<   :\<
    #\v         <
     :>" o",,1-:|
     1          >"|",$\1-:|
    \`            @       $
    ^_"o",@>:!    |       2
           ^-1,*95<+3*2,*5<

Можливо, можна більше пограти в гольф. Подивіться лише на весь пробіл!

Ось моя погана спроба пояснення у формі малюнка MSPaint: Код тече у напрямку стрілки.

V , 43, 40, 38 36 байт

Одна з найдовших відповідей V, яку я коли-небудь писав ...

Àio ddÀPñóo î½o
u2Pí.«/| °|
Vr-HVr_

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

Оскільки в ньому є символи unicode та unprint, тут є оборотний шестигранник:

0000000: c069 6f20 1b64 64c0 50f1 f36f 20ee bd6f  .io .dd.P..o ..o
0000010: 0d0a 7532 50ed 2eab 2f7c 20b0 7c0d 0a56  ..u2P.../| .|..V
0000020: 722d 4856 725f                           r-HVr_

Це завдання стосується маніпулювання текстом, настільки ідеально підходить для V! З іншого боку, V страшенно за умовами та математикою, тому різний вихід для (1, 1) справді перекрутив його ... :(

Пояснення:

À                   "Arg1 times:
 io <esc>           "Insert 'o '
         dd         "Delete this line, and
           À        "Arg2 times:
            P       "Paste it

Тепер у нас є "висота" рядків o з пробілами між ними.

ñ                   "Wrap all of the next lines in a macro. This makes it so that if any 
                    "Search fails, execution will stop (to handle for the [1, 1] case)
 ó                  "Search and replace
  o î½o             "'o'+space+0 or 1 newlines+another 'o'

u                   "Undo this last search/replace
 2P                 "Paste twice
   í                "Search and replace on every line
    .«/| °|         "A compressed regex. This surrounds every non-empty line with bars.

Vr-                 "Replace the current (last) line with '-'
   H                "Move to line one
    Vr_             "Replace this line with '_'

Неконкурентна версія (31 байт):

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

Ця версія використовує кілька функцій, які є більш новими, ніж ця задача на 5 байт коротше!

Друге пояснення:

ddÀP

що "Видалити рядок і вставити її n разів" замінено на ÀÄ"Повторити цей рядок n разів". (-2 байти)

óo î½o
u

що було "Замінити перший матч цього регулярного виразу; Скасувати" було замінено на

/o î½o

Що просто "Пошук відповідності цього регексу" (-1 байт)

І нарешті, Òце просто простий синонім Vr, який обидві «Замініть кожен символ у цьому рядку на« x ». (-2 байти)

32 16-бітний маленький ендіанічний код версії x86, 57 54 51 байт

На 3 байти менше завдяки @ninjalj.

Сильно переписали код і встигли відтерти ще 3 байти

В шістнадцять

FCBA6F208D48FFE20492AAEB2389D941D1E14151B05FF3AAEB0BB87C20AB89D992F3AB92AAB00AAA4E7DEF59B02DF3AA91AAC3

Вхід: BX = ширина, SI = висота, DI вказує на буфер, який отримує результат у вигляді рядка, що закінчується NULL, рядками, розділеними "\ n"

Розбирання:

fc            cld
ba 6f 20      mov    dx,0x206f      ;Storing ' o' in DX for later use
8d 48 ff      lea    cx,[bx+si-0x1] ;CX=width+height-1
e2 04         loop   _main0         ;--CX & brahch if not zero
92            xchg   dx,ax          ;(1,1) case, swap DX & AX
aa            stosb                 ;AL == 'o', CX == 0
eb 23         jmp    _end
_main0:
89 d9         mov    cx,bx
41            inc    cx
d1 e1         shl    cx,1
41            inc    cx           ;Calculate (width+1)*2+1
51            push   cx           ;and save it for future use
b0 5f         mov    al,0x5f      ;'_'
f3 aa         rep    stosb        ;Output the whole line of them
eb 0b         jmp    _loopstart   ;Jump into the loop
_loop:
b8 7c 20      mov    ax,0x207c    ;' |'
ab            stosw               ;Output it once (left bar + space)
89 d9         mov    cx,bx        ;Copy width
92            xchg   dx,ax        ;AX == ' o'
f3 ab         rep    stosw        ;Output it CX times
92            xchg   dx,ax        ;Swap values back, AL == '|'
aa            stosb               ;Output only the right bar
_loopstart:
b0 0a         mov    al,0x0a      ;Newline. Can be replaced with mov ax,0x0a0d for windows newline
aa            stosb               ;convention (at the cost of 1 byte), with stosb replaced with stosw
4e            dec    si           ;Height--
7d ef         jge    _loop        ;Continue if si >= 0 (this accounts for the dummy first pass)
59            pop    cx
b0 2d         mov    al,0x2d      ;'-'
f3 aa         rep    stosb        ;Output bottom line
_end:
91            xchg   cx,ax        ;CX == 0, so swap to get zero in AL
aa            stosb               ;NULL-terminate output
c3            retn

Python 2, 75 73 72 байт

lambda x,y:(x*'__'+'___\n'+('| '+'o '*x+'|\n')*y+'-'*(x*2+3),'o')[x<2>y]

Повертає рядок із умовною обробкою 1,1 блоку.

Дякуємо Лінні та Чепнеру за два байти

CJam, 34

'_q~'o*"||"\*S*f*f+'-f+zN*_,H='o@?

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

Пояснення:

'_        push a '_' character
q~        read and evaluate the input (height and width)
'o*       repeat the 'o' character <width> times
"||"\*    join the "||" string by the string of o's (putting them in between)
S*        join with spaces (inserting a space between every 2 characters)
f*        repeat each character <height> times, making it a separate string
f+        prepend '_' to each string
'-f+      append '-' to each string
z         transpose the array of strings
N*        join with newlines; lego piece is ready, special case to follow
_,        duplicate the string and get its length
H=        compare with H=17
'o        push 'o' for the true case
@         bring the lego piece to the top for the false case
?         if the length was 17, use 'o' else use the lego piece

Рубі, 59 56 байт

Анонімна функція, повертає багаторядковий рядок. Спробуйте в Інтернеті!

-3 байти завдяки запозиченню трюку у @ El'endiaStarman

->w,h{w*h<2??o:?_*(x=2*w+3)+$/+(?|+' o'*w+" |
")*h+?-*x}

Java, 318 312 297 294 260 258 байт

Збережено 15 байт завдяки скелі !

interface a{static void main(String[]A){int b=Byte.valueOf(A[0]),B=Byte.valueOf(A[1]),C=3+b*2;String c="";if(b<2&B<2)c="o";else{for(;C-->0;)c+="_";for(;B-->0;){c+="\n|";for(C=b;C-->0;)c+=" o";c+=" |";}c+="\n";for(C=3+b*2;C-->0;)c+="-";}System.out.print(c);}}

Він працює з аргументами командного рядка.

Безгольовий у читаному для людини вигляді:

interface a {
    static void main(String[] A) {
        int b = Byte.valueOf(A[0]),
            B = Byte.valueOf(A[1]),
            C = 3 + b*2;
        String c = "";
        if (b < 2 & B < 2)
            c = "o";
        else {
            for (; C-- > 0;)
                c += "_";
            for (; B-- > 0;) {
                c += "\n|";
                for (C = b; C-- >0;)
                    c += " o";
                c += " |";
            }
            c += "\n";
            for(C = 3 + b*2; C-- >0;)
                c += "-";
        }
        System.out.print(c);
    }
}

Так, все ще важко зрозуміти, що відбувається, навіть коли програма не працює. Отже, тут йде покрокове пояснення:

static void main(String[] A)

Перші два аргументи командного рядка - які ми використаємо для отримання розмірів - можуть використовуватися в програмі як A[0]і A[1](відповідно).

int b = Byte.valueOf(A[0]),
    B = Byte.valueOf(A[1]),
    C = 3 + b*2;
String c = "";

b- кількість стовпців, Bце кількість рядків і Cє змінною, призначеною для використання в forциклах.

cє твір Лего. Ми додамо до нього рядки, а потім роздрукуємо їх наприкінці.

if (b < 2 & B < 2)
    c = "o";
else {

Якщо фрагмент для друку є 1х1, то обидва b(кількість стовпців) і B(кількість рядків) повинні бути меншими за 2. Отже, ми просто встановлюємо cодиницю, oа потім переходимо до твердження, що System.out.printце фрагмент, якщо це так.

for (; C-- > 0; C)
    c += "_";

Тут ми додаємо (integerValueOfA[0] * 2) + 3підкреслення c. Це самий верхній ряд над усіма отворами.

for (; B > 0; B--) {
    c += "\n|";
    for(C = b; C-- > 0;)
        c+=" o";
    c += " |";
}

Це петля, де ми конструюємо деталь по одному ряду. Що відбувається всередині, неможливо пояснити без прикладів. Скажімо, шматок 4x4:

Before entering the loop, c looks like this:
___________

After the first iteration (\n denotes a line feed):
___________\n
| o o o o |

After the second iteration:
___________\n
| o o o o |\n
| o o o o |

After the third iteration:
___________\n
| o o o o |\n
| o o o o |\n
| o o o o |

.

c += "\n";
for (C = 3 + b*2; C-- > 0;)
    c += "-";

Тут ми додаємо (integerValueOfA[0] * 2) + 3дефіси до твору. Це ряд в самому дні, під усіма отворами.

Частина 4х4, яку я використав для пояснення forциклу, куди фактично побудований шматок, виглядає приблизно так:

___________\n
| o o o o |\n
| o o o o |\n
| o o o o |\n
| o o o o |\n
-----------

System.out.print(c);

І нарешті, друкуємо твір!

Мінколанг 0,15 , 58 57 56 байт

Так, правильно. Я пограв у гольф одного двох смердючих маленьких байтів ...

nn$d*1-5&"o"O.rd2*3+$z1$([" o"]" ||"2Rlkr$Dlz["-_"0G]$O.

Спробуйте тут!

Пояснення

nn                Take two numbers from input (stack is now [w h])

                  C special case C
  $d              Duplicate stack
    *1-           Multiply and subtract 1
       5&         Jump 5 spaces if truthy
         "o"O.    Top of stack was 1*1-1=0, so output "o" and stop.

                     C precalculates width of top and bottom lines for later use C
         r           Reverse stack (now [h w])
          d          Duplicate top of stack
           2*3+      Multiply top of stack by 2 and add 3
               $z    Pop this and store in register (z = 2*w+3)

                                       C generates the row C
                 1$(                   Open while loop prepopulated with top of stack
                    [" o"]             w times, push "o "
                          " ||"        Push "|| "
                               2R      Rotate twice to the right
                                 l     Push newline (10)
                                  k    Break out of while loop

                                           C duplicates the row h times C
                                   r       Reverse stack
                                    $D     Duplicate whole stack h times
                                      l    Push newline

                     C this is for the top and bottom lines C
        z[           Open for loop that repeats z times
          "-_"       Push "_-"
              0G     Relocate top of stack to bottom of stack
                ]    Close for loop

                 $O.    Output whole stack as characters and stop.

Гаразд, це два суттєвих переписування пояснень на два збережені байти. Я не думаю, що я можу або буду грати щось більше з цього. : P

мозковий ебать, 391 байт

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

+++++[-<+++[-<+++<++++++<+++++++<++<++++++++>>>>>]<<+<+<<+<++>>>>>>>]<<<<+<++<->>>>>>,<,>>++++++[<--------<-------->>-]<<->>+<<[>>-<<[>>>+<<<-]]>>>[<<<+>>>-]<[<->>>+<<<[>>>-<<<[>>>>+<<<<-]]>>>>[<<<<+>>>>-]<[<<<<<<<.[-].]<<<+>-]<<+>[->++>+<<]>+++[-<<<<.>>>>]>[-<<+>>]<<<<<<<<<.>>>>>>><[->[->+>+<<]<<<<<<.>>>>>>>[<<<<<<.>.>>>>>-]>[-<<+>>]<<<<<<<.<.<.>>>>>>]>[->++>+<<]>+++[-<<<.>>>]>[-<<+>>]<<

Введення потрібно вказати як дві цифри. Як і в, щоб зробити, (8, 2)ви просто увійдете 82.

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

Зламатися:

Спочатку покладіть на стрічку необхідні символи: (newline)| o_-

+++++[-<+++[-<+++<++++++<+++++++<++<++++++++>>>>>]<<+<+<<+<++>>>>>>>]<<<<+<++<->>>>>

Потім зібрати вхід у дві комірки і відняти 48 з кожної (щоб отримати числове значення, а не числовий символ)

>,<,>>++++++[<--------<-------->>-]<<

Далі перевірте наявність окремого випадку (1, 1)(Зауважте, що лише на цю перевірку припадає 109 байт коду). Наче ifу нас не було досить важко зробити мозковий епізод, у нас є вкладене if:

->>+<<[>>-<<[>>>+<<<-]]>>>[<<<+>>>-]<[<->>>+<<<[>>>-<<<[>>>>+<<<<-]]>>>>[<<<<+>>>>-]<[<<<<<<<.[-].]<<<+>-]<<+

Далі йде структура, яка перевіряє, чи клітинка x дорівнює нулю чи нуль:

temp0[-]+
temp1[-]
x[
 code1
 temp0-
 x[temp1+x-]
]
temp1[x+temp1-]
temp0[
 code2
temp0-]

Однак у вкладеному ifнам потрібно мати 4 тимчасові комірки.

Тепер ми переходимо до власне друку символів:

Роздрукуйте верхню панель та новий рядок:

>[->++>+<<]>+++[-<<<<.>>>>]>[-<<+>>]<<<<<<<<<.>>>>>>>

Друкуйте a |, рядок os, інший |та новий рядок кілька разів, рівний висоті:

<[->[->+>+<<]<<<<<<.>>>>>>>[<<<<<<.>.>>>>>-]>[-<<+>>]<<<<<<<.<.<.>>>>>>] 

І надрукуйте нижню панель (тут не потрібен новий рядок):

>[->++>+<<]>+++[-<<<.>>>]>[-<<+>>]<<

Сітківка , 52 байти

Кількість байтів передбачає кодування ISO 8859-1. Зверніть увагу, що шостий рядок повинен містити єдиний пробіл.

\G1?
$_¶
1* 



.+
|$&|
\G.
_
r`.\G
-
s`^.{17}$|1
o

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

Введення не одинарне, використовуючи 1як одинарну цифру, простір як роздільник і висоту з наступною шириною.

Пояснення

Всі етапи в цій програмі є голими замінами, періодично з регулярним модифікатором регулярних виразів (без повторень чи циклів, без інших типів етапів). Він навіть не використовує специфічні для Retina функції заміни, окрім звичайних ¶псевдонімів для лінійного годування.

\G1?
$_¶

Мета цього - "примножити" два входи. Наша мета - створити h+2рядки з w 1s кожен ( h+2щоб ми могли повернути верх і низ в _і -пізніше). \GЯкір вимагає матчу , щоб почати , де останній зупинився. Тобто, якщо ми колись не зможемо зіставити символ у рядку, подальші символи також не збігаються. Ми використовуємо це для узгодження лише 1s в h, але не в wтому, що регулярний вираз не дозволяє збігати простір, що розділяє їх. Однак ми також робимо 1необов'язкові, щоб ми отримали додатковий порожній збіг в кінці h. Ось h+1сірники. Кожен із них замінюється на весь вхід ( $_) з подальшим лінійним подачею.wсама залишається недоторканою, що дає нам h+2другу копію. Скажіть, вхід був 11 1111, то ми тепер отримали:

11 1111
11 1111
11 1111
 1111

Це досить добре. У нас є кілька додаткових матеріалів, але h+2копії wє.

1* 

Зауважте, що в кінці першого рядка є пробіл. Це видаляє ці префікси з рядків, щоб у нас залишилися лише ws.

Ну добре, це не дуже працює з форматуванням SE ... перший рядок порожній, а другий рядок повинен містити єдиний пробіл. Це вставляє пробіли у кожне можливе положення, тобто на початку та в кінці кожного рядка та між кожною парою 1s:

 1 1 1 1 
 1 1 1 1 
 1 1 1 1 
 1 1 1 1 

Ми перетворимо їх на os пізніше

.+
|$&|

Це просто загортає кожен рядок у пару |:

| 1 1 1 1 |
| 1 1 1 1 |
| 1 1 1 1 |
| 1 1 1 1 |

Тепер ми подбаємо про верхній і нижній частині:

\G.
_

Час \Gзнову засяяти. Це відповідає кожному символу в першому рядку і перетворює його в a _.

r`.\G
-

Те саме, але завдяки rмодифікатору (режим справа наліво) це відповідає символам в останньому рядку і перетворює їх у -. Отже, тепер ми маємо:

___________
| 1 1 1 1 |
| 1 1 1 1 |
-----------

Зараз залишилося лише дві речі: перетворити їх 1на os, а якщо вхід був, 1 1то oзамість цього все перетворимо . Ми можемо впоратися з обома з них на одному етапі:

s`^.{17}$|1
o

sрегулярний режим однолінійного режиму (тобто він .відповідає лінійним стрічкам ). Якщо введення було 1 1результатом, то він матиме мінімальний розмір 17 символів, тому ми можемо зіставити його ^.{17}$та замінити його o. В іншому випадку, якщо це не вдасться, ми просто зрівняємо всі 1і замінимо їх на o.

Джолф, 36 байт

?w*jJρΡ,a+3ώj+2J'-"-+"d*'_lH"  ' o'o
?w*jJ                             'o   return "o" if j * J - 1
       ,a                              make a box
         +3ώj                           of width +3ώj = 3+2*j
             +2J                        of height +2J = 2+J
                '-                      specifying corners as "-"
      Ρ           "-+"                 replacing the first run of "-"s
                      d*'_lH            with a run of "_"s of equal length
     ρ                      "  '       replacing all "  "
                               ' o      with " o"

Джолф, 24 байти, неконкурентоспроможний

Ну, я зробив кращу коробку вбудований.

?w*jJ,AhώjJ"_-'_-'|' o'o

Джолф, 38 37 байт

?w*jJΆ+*'_γ+3ώjS*JΆ'|*j" o' |
"*'-γ'o

Прості речі, справді. Збережено байт, зауваживши, що !Ζ(математичний зета або відхилення стійкості) дорівнює лише 0, коли обидва аргументи дорівнюють 1, а в іншому випадку фальсифікується (у нашому випадку).

05AB1E , 33 байти

Код:

*i'oë¹·3+©'_׶²F'|„ o¹×„ |¶}®'-×J

Пояснення:

*i'o                               # If both input equal 1, push "o"
    ë                              # Else, do...
     ¹·3+                          # Push input_1 × 2 + 3
         ©                         # Copy this number to the register
          '_×                      # Multiply by "_"
             ¶                     # Push a newline character
              ²F           }       # Do the following input_2 times:
                '|                 # Push "|"
                  „ o              # Push " o"
                     ¹×            # Multiply this by input_1
                       „ |         # Push " |"
                          ¶        # Push a newline character
                            ®      # Retrieve the value from the register
                             '-×   # Multiply by "-"
                                J  # Join everything and implicitly print.

Використовує кодування CP-1252 . Спробуйте в Інтернеті! .

JavaScript (ES6), 89 86 байт

(x,y,g=c=>c[r=`repeat`](x*2+3))=>x*y-1?g(`_`)+`
`+`| ${`o `[r](x)}|
`[r](y)+g(`-`):`o`

Редагувати: збережено 3 байти завдяки @Shaggy.

Python 2, 71 байт

lambda x,y:('o',x*'__'+'___\n'+'| %s|\n'%('o '*x)*y+'-'*(x*2+3))[x+y>2]

Befunge, 144 байт

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

&::&*:1`v
v3*2:\/\_"o",@
>+:  v   >52*," |",, v
>,1-:vLEG O MAKERv::\<
^"_" _$\:|<v "o "_v
v52:+3*2$<,>,,1-:^$
>*,v <    ^"|":-1\<
v-1_@,
>:"-"^

ви можете перевірити код тут

Reng v.4, 82 байт, неконкурентоспроможний

Я натиснув виправлення помилок, яке виправляє перезаписані функції самі (будь ласка, не питайте; мої речі переслідуються)

i#wi#hhw+2e1+ø ~*x}o:{"-"ö<
"_"{:o}w2*3+#xx*2ø
"o"o~
ö"|"o"o"{Wo:o}w*"| "ooh1-?^#h

Вводить дані як проміжні номери, наприклад 4 2. Спробуйте тут!

PowerShell v2 +, 76 байт

param($x,$y)if($x+$y-2){"_"*($z=$x*2+3);"|$(" o"*$x) |`n"*$y+'-'*$z;exit}"o"

Здійснює введення, а потім перевіряє ifзаяву. Оскільки ненульові значення є надійними в PowerShell, якщо принаймні один із них $xі $yне дорівнює 1, ifволевиявлення буде істинним.

Всередині цього ifряду є множення рядків. Спочатку ми побудуємо наш рядок підкреслення, заощадивши $zна потім. Це розміщується на трубопроводі. Далі ми побудуємо наш рядок із сторін і шпильок (з кілками, помноженими на $x), виконані $yрази, і з'єднаємо це з нашими тиреми $z. Потім ця струна розміщується на трубопроводі і ми exit. Трубопровід промивається, а друк неявний. Зауважте, що ми отримуємо новий рядок між підкресленнями та першим рядком кілочків безкоштовно, оскільки .ToString()роздільником за замовчуванням для виведення масиву є `n(і ми виводимо масив рядків).

Якщо значення iffalse, ми знаходимося в спеціальному 1 1випадку, тому ми просто ставимо "o"себе на конвеєр і виходимо, з друком знову неявно.

Приклади

PS C:\Tools\Scripts\golfing> .\print-a-lego-piece.ps1 1 1
o

PS C:\Tools\Scripts\golfing> .\print-a-lego-piece.ps1 5 3
_____________
| o o o o o |
| o o o o o |
| o o o o o |
-------------

Баш, 186 , 163 , 156 , 148 , 131 , 130 байт

 ## Arg1 - Lego width
 ## Arg2 - Lego height 
function print_lego() { 
(($1+$2>2))&&{
printf _%.0s `seq -1 $1`
echo
for((i=$2;i--;)){ 
 printf \|
 for((j=$1;j--;)){
  printf o
 }
 echo \| 
}
printf =%.0s `seq -1 $1`
echo 
}||echo o
}

Примітка. Якщо лего вам справді потрібні дефіси для останнього рядка, то змініть останній printf на

printf -- -%.0s `seq -1 $1`

і додайте два байти.

Perl 5 - 84 77 байт

84 байт

sub l{($x,$y)=@_;$w=3+2*$x;warn$x*$y<2?"o":'_'x$w.$/.('| '.'o 'x$x."|\n")x$y.'-'x$w}

77 байт. З деякою допомогою Дома Гастінгса

sub l{($x,$y)=@_;$x*$y<2?o:'_'x($w=3+2*$x).('
| '.'o 'x$x."|")x$y.$/.'-'x$w}

C, 202 191 байт

#define p printf
i,w,h;t(char*c){for(i=0;p(c),++i<w*2+3;);p("\n");}f(){t("_");for(i=0;i<w*h;)i%w<1?p("| o "):p("o "),i++%w>w-2&&p("|\n");t("-");}main(){scanf("%d %d",&w,&h);w*h<2?p("o"):f();}

Дякуємо @Lince Assassino за економію 11 байт!

Безголівки:

#include <stdio.h>
#define p printf

int i, w, h;

void t(char *c)
{
    for(i=0; p(c), ++i<w*2+3;);
    p("\n");
}

void f()
{
    t("_");
    for(i=0; i<w*h;)
    {
        i%w<1 ? p("| o ") : p("o ");
        i++%w>w-2 && p("|\n");
    }
    t("-");
}

int main()
{
    scanf("%d %d", &w, &h);
    w*h<2 ? p("o") : f();
}

Кориця гумка, 32 байти

0000000: 6c07 d5f5 7a5d 9cdf 5ae6 52ae 4050 0c35  l...z]..Z.R.@P.5
0000010: 18d9 052f 0082 9b42 e7c8 e422 5fe4 7d9f  .../...B..."_.}.

Без конкуренції Спробуйте в Інтернеті. Введення має бути точно у формі [width,height]без проміжку між комою та висотою.

Пояснення

Рядок декомпресується до цього:

l[1,1]&o;?&`p___~__~
%| ~o ~|
%---~--~

Перший lетап відображає [1,1]в o(окремий випадок), а все інше на рядок

`p___~__~
%| ~o ~|
%---~--~

Тоді backtick сигналізує про початок другого етапу; замість виведення цього рядка, CG відсікає backtick і виконує рядок. Потім pрежим повторює всі символи всередині тильдів першого параметра (ширину) разів, а потім повторює символи всередині другого параметра (висоти) знаків відсотків. Отже, [4,2]це перетворюється на це:

___________
%| o o o o |
%-----------

а потім у:

___________
| o o o o |
| o o o o |
-----------

Пакетна, 172 170 байт

@echo off
if "%*"=="1 1" echo o&exit/b
set o=
for /l %%i in (1,1,%1)do call set o=%%o%% o
echo ---%o: o=--%
for /l %%i in (1,1,%2)do echo ^|%o% ^|
echo ---%o: o=--%

Редагувати: збережено 2 байти завдяки @ CᴏɴᴏʀO'Bʀɪᴇɴ @ EʀɪᴋᴛʜᴇGᴏʟғᴇʀ.

Я можу зберегти 7 байт, якщо можу припустити, що увімкнено затримку розширення.

Vim, 56 натискань клавіш

Це здається завданням редагування тексту, тому Vim - очевидний вибір! Я приймаю введення як текстовий файл з двома цілими числами, розділеними пробілом, і виводя відповідь в один і той же файл. Також я ненавиджу вас за те, що у вас є особливий футляр 1x1 ... У будь-якому випадку:

"adt l"bDro:if@a*@b==1|wq|en<cr>Di| |<esc>@aio <esc>yy@bPVr_GpVr-ZZ

а якщо не було спеціальної справи, 35 натискань клавіш

"adt x"bDi| |<esc>@aio <esc>yy@bPVr_GpVr-ZZ

Поломка для здорових людей:

"adt l"bD

Видаліть числа з буфера в @a та @b (пробіл зберігається)

         ro:if@a*@b==1|wq|en<cr>

Замініть простір на "o", і, якщо це спеціальний випадок, збережіть і закрийте

                                Di| |<esc>

Очистіть рядок і запишіть краї блоку лего

                                          @aio <esc>

Вставте @a багато "o", щоб отримати готову середню частину

                                                    yy@bP

Зробіть рядок і зробіть @b додаткові копії (одна занадто багато)

                                                         Vr_

Ми знаходимося вгорі буфера, замінюємо додаткову лінію на підкреслення

                                                            Gp

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

                                                              Vr-ZZ

Замініть рядок тире, збережіть і вийдіть

Pyth, 38 байт

?t*QJEjb+sm\_K+\|+j\o*dhQ\|+mKJsm\-K\o

Тестовий набір.

Haskell, 76 байт

1#1="o"
w#h|f<-w*2+3=f!"_"++'\n':h!('|':w!" o"++" |\n")++f!"-"
n!s=[1..n]>>s

Приклад використання: 3 # 2дає вам рядковий рядок для цегли 3 на 2.

Безголівки:

(#) :: Int -> Int -> String
1     #   1    = "o"
width # height = let longWidth = 2 * width + 3 in -- golfed as 'f'
                      (        longWidth `times` "_"  ++   "\n" )
  ++ height   `times` ( "|" ++     width `times` " o" ++ " |\n" )
  ++                  (        longWidth `times` "-"            )

-- | golfed as (!)
times :: Int -> [a] -> [a]
times n s = concat $ replicate n s

Гроовий, 107 , 98 , 70 , 64

{x,y->t=x*2+3;x<2&&y<2?"o":'_'*t+"\n"+"|${' o'*x} |\n"*y+'-'*t}

Тестування:

(2,2)
(1,1)
(8,2)
(1,4)
_______
| o o |
| o o |
-------
o
___________________
| o o o o o o o o |
| o o o o o o o o |
-------------------
_____
| o |
| o |
| o |
| o |
-----

Befunge, 114 113 108 101 байт

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

&::&+:2`^|,+55_"_",^
-4:,,"| "<\_|#:+1\,,"|"+55$_2#$-#$" o",#!,#:<
  ,"-"_@#:-1<
 :*2+2\-_"o",@v!:-1<

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

APL, 46 байт

{⍵≡1 1:'o'⋄'-'⍪⍨'_'⍪'|',' ','|',⍨'o '⍴⍨1 2×⌽⍵}

Охоронець: ⍵≡1 1:'o'для особливої ​​справи. В іншому випадку 'o '⍴⍨1 2×⌽⍵будується вміст. А решта - лише бокс.

C #, 198 байт

void f(int x,int y){int l=x*2+3;Console.Write(y==x&&x==1?"o":s("_",l)+"\n"+s("|"+s(" o",x)+" |\n",y)+s("-",l));}string s(string m,int u){return string.Join("",new string[u].Select(n=>m).ToArray());}

швидкий і брудний

Мені довелося написати функцію, що множує рядки

невольф (для пропозицій)

public static void f(int x,int y)
{
    int l=x*2+3;
    Console.Write(y == x && x == 1 ? "o" : s("_",l)+"\n"+ s("|" + s(" o", x) + " |\n", y) + s("-",l));

}
public static string s(string m,int u)
{
    return string.Join("", new string[u].Select(n => m).ToArray());
}

Октава, 97 95 86 байт

@(w,h){[a=~(1:w*2+3)+95;repmat(['| ' repmat('o ',1,w) '|'],h,1);~a+45],'o'}{(w*h<2)+1}

Я використовував метод @atlasologist в Python для тестування (1, 1):(...,'o')[x<2>y]

Завдяки @Luis Mendo за збереження 7 байт: a=ones(1,w*2+3)*'_'до a=~(1:w*2+3)+95і a./a*'-'до~a+45

Дякуємо @pajonk за збереження 2-х байт:f=