Під час руху я розбив лампу. Тепер мені потрібна нова. Ваша робота зробити мені світильник! Я не впевнений, якого розміру я хочу, хоча знаю, що хочу чітко.

Ваша програма / функція повинна брати номер вводу та роздрукувати лампу з такою великою кількістю зубців / ударів.

Приклади:

Вхід:2

Вихід:

/ - \
 ()
 ()
/ __ \

Вхід:3

Вихід:

/ - \
 ()
 ()
 ()
/ __ \

Вхід:5

Вихід:

/ - \
 ()
 ()
 ()
 ()
 ()
/ __ \

Правила:

• 0 і мінус значення не мають значення
• Щоб надати лампам (це завдання) більше різноманітності, потрібно змінити відтінок лампи.
  • Вони повинні бути 4 символи в ширину і 1 символ у висоту.
  • Вони можуть бути будь-якої форми, включаючи форми, що не мають відтінку світильника.
  • Вони не повинні містити пробілів.
  • Основа повинна залишатися такою ж.
• Ви повинні показати приклад введення та виведення з відтінком лампи.
• Найкоротший код виграє!

Pyth - 16 байт

Використовує котирування для відтінку, оскільки N є преініціалізованим до цього.

*N4VQ+d`();"/__\

Спробуйте його онлайн тут .

* 4            String repetition 4x, implicit print
 N             Preinitialized to Quote
VQ             For N in range(Q)
 +             String concat
  d            Space
   `()         Repr of empty tuple
;              Close for loop
"/__\          Implicitly print string, implicit close quote

Зразок для 5:

""""
 ()
 ()
 ()
 ()
 ()
/__\

Сніговик 0,2,0 , 42 символи

)vg10sB]"[--]
"sP:" ()
"sP;bR"/__"sP92wRsP

Проба зразка:

llama@llama:...Code/snowman/ppcg53483lamp$ snowman lamp.snowman
5
[--]
 ()
 ()
 ()
 ()
 ()
/__\

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

"/__"sP92wRsP

92є кодом ASCII для зворотної косої риси, wRзагортає його в масив, і тепер я можу надрукувати його, sPтому що "рядки" у Snowman насправді є лише масивами чисел.

> <> , 43 41 38 байт

"\__/"aiv
"&-1v!?:<&a" ()
~"!_\
?!;o>l

Вхід через кодову точку, наприклад, простір становить 32. Для цього використовується частина власного коду програми як абажур, в результаті чого виходить щось схоже на супутникову антену:

~\_!
 ()
 ()
 ()
 ()
 ()
/__\

(Пропозиція завдяки @randomra)

Ще три байти ми можемо змінити третій рядок, щоб додати трохи більше налаштування:

"\__/"aiv
"&-1v!?:<&a" ()
__\"\~"/
?!;o>l

Це створює одну з тих ламп, які вистрілюють світло вгору, через відсутність кращого способу її поставити:

\__/
 ()
 ()
 ()
 ()
 ()
/__\

R, 54 52 46 байт

cat("RRRR",rep(" ()",scan()),"/__\\",sep="\n")

У цій версії вхід і вихід майже змішані разом:

{in / out} PUT:

> cat("RRRR",rep(" ()",scan()),"/__\\",sep="\n")
1: 4
2: 
Read 1 item
RRRR
 ()
 ()
 ()
 ()
/__\

EDIT 1 : -2 байти завдяки коментарю @manatwork.
EDIT 2 : -6 байт. Повний кредит знову надходить на @manatwork

Солома , 26 байт (неконкурентна)

<#~('--'
)>( ()
)-*>(/__\)>

Використовуйте '--'як відтінок світильника, введіть одинарний тепер у десяткових

CJam, 18 байт

"/__\
"" ()
"ri*1$

Проба зразка для введення 5:

/__\
 ()
 ()
 ()
 ()
 ()
/__\

Спробуйте його онлайн тут

JavaScript ES6, 34 байти

i=>`|==|
${` ()
`.repeat(i)}/__\\`

Нові рядки значні

Приклад з введенням 5:

|==|
 ()
 ()
 ()
 ()
 ()
/__\

sed, 28 байт

s#.# ()\n#g
s#^\|$#/__\\\n#g

Здійснює введення в одинаковому режимі. Відтінок - це очевидний вибір (такий же, як і основа).

Тестовий запуск

$ echo -n 111 | sed -f lamp.sed
/__\
 ()
 ()
 ()
/__\

Gema: 30 символів

*=gema\n@repeat{*;\ ()\n}/__\\

Проба зразка:

bash-4.3$ gema '*=gema\n@repeat{*;\ ()\n}/__\\' <<< 3
gema
 ()
 ()
 ()
/__\

jq: 30 символів

(Код 29 символів + параметр командного рядка з 1 символом.)

8888,(range(.)|" ()"),"/__\\"

Проба зразка:

bash-4.3$ jq -r '8888,(range(.)|" ()"),"/__\\"' <<< 3
8888
 ()
 ()
 ()
/__\

On-line тест (Проходження -rURL-адреси не підтримується - перевірте Raw Output.)

C, 54 байти

Телефонуйте f()з потрібною висотою лампи.

f(n){for(puts("||||");n--;puts(" ()"));puts("/__\\");}

Спробуйте це на ideone.

Приклад виведення для 5:

||||
 ()
 ()
 ()
 ()
 ()
/__\

Пайк, 15 байт

" ()"~mQAD"/__\

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

     ~m         - 1000
" ()"           -  " ()"
       QAD      - duplicate(^) input times
          "/__\ - "/__\"

Виходи:

1000
 ()
 ()
/__\

Котлін , 36 байт

{"|MM|\n${" ()\n".repeat(it)}/__\\"}

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

Пробіл , 169 байт

[S S S N
_Push_0][T  N
T   T   _Read_STDIN_as_integer][S S S T S T T   T   S S N
_Push_92_\][S S S T S T T   T   T   T   N
_Push_95__][S N
S _Duplicate_95__][S S S T  S T T   T   T   N
_Push_47_/][N
S S N
_Create_Label_LOOP][S S S N
_Push_0][T  T   T   _Retrieve_at_address_0][S S S T N
_Push_1][T  S S T   _Subtract][S N
S _Duplicate][S S S N
_Push_0][S N
T   _Swap_top_two][T    T   S _Store_at_address_0][N
T   T   S N
_If_neg_Jump_to_Label_PRINT][S S S T    S T S N
_Push_10_newline][S S S T   S T S S T   N
_Push_41_)][S S S T S T S S S N
_Push_40_(][S S S T S S S S S N
_Push_32_space][N
S N
N
_Jump_to_Label_LOOP][N
S S S N
_Create_Label_PRINT][S S S T    S T S N
_Push_10_newline][S S S T   S S S S T   N
_Push_33_!][S N
S _Duplicate_33_!][S N
S _Duplicate_33_!][S N
S _Duplicate_33_!][N
S S T   N
_Create_Label_LOOP_2][T N
S S _Print_as_character][N
S N
T   N
_Jump_to_Label_LOOP_2]

Букви S(пробіл), T(вкладка) та N(новий рядок) додаються лише як підкреслення.
[..._some_action]додано лише як пояснення.

Спробуйте його в режимі он-лайн (лише із необробленими просторами, вкладками та новими рядками)

Пояснення в псевдокоді:

Натискає всі символи у зворотному порядку до стеку, а потім друкує їх у циклі.

Integer i = STDIN as input
Push "\__/" to the stack
Start LOOP:
  i = i - 1
  if(i is negative):
    Go to function PRINT
  Push "\n)( " to the stack
  Go to next iteration of LOOP

function PRINT:
  Push "\n!!!!" to the stack
  Start LOOP_2:
    Print top as character to STDOUT
    Go to next iteration of LOOP_2

ПРИМІТКА: iвищевказаний псевдо-код зберігається назад у купі під час кожної ітерації LOOP, оскільки ми не хочемо залишати його на стеку для друку в кінці.

Полотно , 8 байт

(×_¶/ｅ⟳║

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

Пояснення:

(×        repeat "(" input times
  _¶/e    encase it on both sides in "_\n/"
          the 1st line is surrounded in "_" and the second ends and starts with "/"
      ⟳   rotate the string clockwise without changing characters
       ║  palindromize horizontally with 0 overlap

05AB1E , 17 15 13 11 байт

„ (и„/_.ø)˜∞

-2 байти (17 → 15) завдяки @EriktheOutgolfer .
-2 байт (13 → 11) після натхнення на відповідь @dzaima 's Canvas .

Шапка - це те саме, що і основа ( /__\).

Пояснення:

„ (            # Literal string " ("
   и           # Repeat " (" the input amount of times
               #  i.e. " (" and 3 → [' (',' (',' (']
    „/_        # Literal string "/_"
       .ø      # Surround the list of " (" with "/_" on both ends
               #  i.e. [' (',' (',' ('] → ['/_',[' (',' (',' (',' ('],'/_']
         ˜     # Flatten this list
               #  i.e. ['/_',[' (',' (',' ('],'/_'] → ['/_',' (',' (',' (','/_']
          ∞    # Mirror each item
               #  i.e. ['/_',' (',' (',' (','/_'] → ['/__\',' () ',' () ',' () ','/__\']
               # And output the list new-line delimited (implicitly due to the mirror)

Старі 13 байт відповідають:

„/_D„ (Iиs)˜∞

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

Excel, 31 байт

Функція анонімного робочого аркуша, яка приймає введення як числовий з діапазону [A1]і виводить в клітинку, що викликає.

Ця лампа є музичною - і допоможе оживити і полегшити ваш день.

="/\
"&REPT(" ()
",A1)&"/__\"

Вихідні дані

PowerShell 5.1, 28 26 байт

_{Дякую Mazzy за 2 байти}

8008;," ()"*"$args";"/__\"

Оскільки відтінком можуть бути будь-які 4 символи, за допомогою числа зберігається пара лапок. Найважче було знайти приємний відтінок.

Вихід:

PS C:\Users\ItsMe\Desktop> .\scratch.ps1 4
8008
 ()
 ()
 ()
 ()
/__\

Python 2, 36 байт

print"-"*4+"\n ()"*input()+"\n/__\\"

Для введення 4:

----
 ()
 ()
 ()
 ()
/__\

Зверніть увагу, що для Python, що будь-який відтінок лампи з використанням труб - на байт менше.

-1 байт завдяки @Alex!

Japt , 17 байт

Æ` ()`Ãi¥² p"/__\

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

Вихід для 5:

====
 ()
 ()
 ()
 ()
 ()
/__\

SWI-Prolog, 73 60 байт

a(X):-write(golf),writef("%r",["\n ()",X]),write("\n/__\\").

a(5). виходи

golf
 ()
 ()
 ()
 ()
 ()
/__\

Джулія, 36 байт

n->print("|~~|\n"*" ()\n"^n*"/__\\")

Це створює неназвану функцію, яка приймає ціле число як вхід і друкує для stdout.

Приклад:

julia> f(4)
|~~|
 ()
 ()
 ()
 ()
/__\

Bash + coreutils, 37 байт

yes ' ()'|sed '1i####
'$1'{a/__\\
q}'

Нові рядки необхідні і рахуються в байтах загалом. GNU sed потрібно.

Виконати:

./squiggly_lamp.sh 2

Вихід:

####
 ()
 ()
/__\

Рубін, 42 байти

i=gets.to_i
puts "|--|\n#{" ()\n"*i}/__\\"

Неоскрипт , 28 байт

{n|"[~~]
"+" ()
"*n+"/--\\"}

Java 7 11, 84 83 37 байт

n->"i!!i\n"+" ()\n".repeat(n)+"/__\\"

Спробуйте в Інтернеті. (ПРИМІТКА. Java 11 ще не підтримується в TIO, тому String.repeat(int)емулюється з repeat(String,int)тим самим числом байтів.)

Використовується i!!iяк ковпачок. ¡!!¡виглядає краще , але на два байти більше.

Пояснення:

n->                    // Method with integer parameter and String return-type
  "i!!i\n"             //  Return the cap + new-line
  " ()\n".repeat(n)    //   appended with " ()" and a new-line `n` amount of times
  "/__\\"              //   append with "/__\"

Perl 5 , 24 байти

$_=$<.'
 ()'x$_.'
/--\
'

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

Використовується 1000як ковпачок.

Попереду , 38 байт

I"|MM|"Wr
~W" ()"oN<s!:-1~
@W"/__\"oN<

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

Зразки

1
|MM|
 ()
/__\

2
|MM|
 ()
 ()
/__\

3
|MM|
 ()
 ()
 ()
/__\

Befunge-93 , 50 байт

"\__/"&v
0-1_v#:<g00" ()"*25p0
*25$<>:#,_@#::::"_"

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

Приклад із введенням 3

____
 ()
 ()
 ()
/__\

PHP, 38 байт

/--\<?while($argn--)echo"
 ()"?>

/__\

Зберегти у файл; запустіть як трубу -nFабо спробуйте в Інтернеті .