ท้าทาย

ฉันต้องการความช่วยเหลือในการสร้างกำแพงอิฐ! โยนรหัสบางส่วนสำหรับฉันโดยไม่ใช้อินพุตและสร้างกำแพงเอาต์พุตต่อไปนี้ที่แสดงด้านล่าง:

_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__

ตอนนี้กำแพงนี้10มีความสูง70อักขระและกว้างเป็นพิเศษ

ตามที่ระบุไว้ข้างต้นไม่มีอินพุตรหัสเท่านั้น จำนวนไบต์น้อยที่สุดเราต้องสร้างกำแพงอิฐนี้อย่างมีประสิทธิภาพ เห็นได้ชัดว่าโปรแกรมนี้มีฟังก์ชั่นในการสร้างกำแพง .. มิฉะนั้นมันจะไม่สร้างเอง! โชคดี!

ผู้ชนะ

ผู้ชนะไปที่Marinusโดยใช้APLภาษาซึ่งต้องใช้ทั้ง12ไบต์! https://codegolf.stackexchange.com/a/99028/61857

ขอบคุณทุกคนที่เข้าร่วม!

APL ขนาด 12 ไบต์

10 70⍴'_|__'

เอาท์พุท:

      10 70⍴'_|__'
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__

Trumpscript , 303 285 244 231 226 ไบต์

make i 1000005-1000000
as long as,i;:
make i,i - fact;
say "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
say "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"!
America is great

ฉันอยากจะบอกว่านี่เป็นหนึ่งในภาษา verbose ที่สุดที่เกือบทุกอย่างล้มเหลวในการรวบรวมเป็นโปรแกรมทำงาน

เห็นได้ชัดว่า-งานแทนที่จะminusเป็นขึ้นอยู่กับล่ามอย่างสมบูรณ์และบางครั้งทำงาน ครั้งนี้มันก็เลยทำแบบนั้นเหมือนกอล์ฟ

การใช้ความผิดจริง Trumpscript จะถูกเขียนเป็น Python ดังนั้นfactเมื่อใช้เป็นจำนวนเต็ม

ยินดีต้อนรับเคล็ดลับการเล่นกอล์ฟ

J, 12 ไบต์

10 70$'_|__'

จัดรูปทรงสตริงทางด้านขวาให้เป็นรูปร่าง 10 คูณ 70 Simple!

BBC BASIC ขนาด 28 ไบต์

Tokenised ขนาดไฟล์ 23 ไบต์

WIDTH70P.STRING$(175,"_|__")

WIDTH70ตามปกติจะขึ้นบรรทัดใหม่ มันตั้งค่าความกว้างของฟิลด์เป็น 70 จากนั้นเราก็พิมพ์ 175 สำเนาของสตริงซึ่งล้อมรอบ

Brainfuck, 171 ไบต์

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

Brainfuck สนุกดีนี่คือสิ่งที่ฉันส่ง

นี่คือผลลัพธ์:

_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__

นี่คือลิงค์สำหรับทดลองใช้

https://repl.it/EW2Z/0

WinDbg ขนาด 45 ไบต์

f2000000 L2bc 5f 7c 5f 5f;da/c46 2000000 L2bc

มันทำงานอย่างไร:

f 2000000 L2bc 5f 7c 5f 5f; *Repeat the pattern _|__ (5F 7C 5F 5F) to fill 2BC (700) bytes 
                            *starting at 2000000
da /c46 2000000 L2bc        *Show 2BC (700) ASCII chars starting from 2000000 in lines 
                            *of length 0x46 (70)

เอาท์พุท:

0:000> f2000000 L2bc 5f 7c 5f 5f;da/c46 2000000 L2bc
Filled 0x2bc bytes
02000000  "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
02000046  "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"
0200008c  "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
020000d2  "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"
02000118  "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
0200015e  "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"
020001a4  "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
020001ea  "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"
02000230  "_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|"
02000276  "___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__"

Pyth, 12 ไบต์

รหัส:

jcT*175"_|__

คำอธิบาย:

       "_|__    # For the string "_|__"
   *175         # Repeat it 175 times
 cT             # Chop into 10 equal pieces
j               # Join them by newlines

ลองได้ที่นี่

Python 2, 37 ไบต์

s="_|__"*17;print(s+"_|\n__%s\n"%s)*5

แยกสองแถวเป็น 17 สำเนา_|__รวมทั้งอีกหนึ่งสำเนาถูกขัดจังหวะโดยขึ้นบรรทัดใหม่บวกอีก 17 สำเนารวมอีกบรรทัดใหม่

ทางเลือกอีกต่อไป:

print"%s_|\n__%s\n"%(2*("_|__"*17,))*5

s="_|__"*17;print"%s_|\n__%%s\n"%s%s*5

for i in[0,2]*5:print("_|__"*18)[i:i+70]

print("_|__"*17+"_|\n"+"___|"*17+"__\n")*5

for s in["_|__","___|"]*5:print(s*18)[:70]

s="_|__"*99;exec"print s[:70];s=s[2:];"*10

print("%s"*70+"\n")*10%(175*tuple("_|__"))

05AB1E , 13 ไบต์

รหัส:

"_|__"175×Tä»

คำอธิบาย:

"_|__"         # For the string "_|__"
      175×     # Repeat that 175 times
          Tä   # Split into 10 even pieces
            »  # And join them by newlines

ใช้การเข้ารหัสCP-1252 ลองออนไลน์!

PHP, 44 42 41 ตัวอักษร

<?=chunk_split(str_pad(_,700,"|___"),70);

(เพียงเพราะไม่มีโอกาสใช้chunk_split()มาก่อน)

ขอบคุณที่:

• user59178สำหรับการแนะนำให้ใช้str_pad()(-1 ตัวอักษร)

วิ่งตัวอย่าง:

bash-4.3$ php <<< '<?=chunk_split(str_pad(_,700,"|___"),70);'
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__

เป็นกลุ่ม30 24 19 กดแป้นพิมพ์

18a___|<esc>YP2x}h.yk4P

ขอบคุณ DrMcMoylex และ nmjcman101 สำหรับการบันทึกการกดแป้นที่มีค่า!

Perl, 47 34 29 ไบต์

$_="_|__"x175;say for/.{70}/g

Perl, 31 ไบต์

say+($@="_|__"x17,"_|
__$@
")x5

คุณจะต้อง-Eตั้งค่าสถานะเพื่อให้ทำงาน:

perl -E 'say+($@="_|__"x17,"_|
__$@
")x5'

V , 24 , 16 ไบต์

175i_|__ò70|lé

ลองออนไลน์! นี้มี<esc>ตัวอักษร ( 0x1B) ดังนั้นนี่คือ hexdump:

0000000: 3137 3569 5f7c 5f5f 1bf2 3730 7c6c e90a  175i_|__..70|l..

8 ไบต์ช่วยทางอ้อมขอบคุณจอร์แดน!

V , 18 ไบต์

-1 ไบต์ขอบคุณ DJMcMayhem

175i_|__<Esc>Ó.û70}/°ò

นี่คืออักขระที่ไม่สามารถพิมพ์ได้ในรูปแบบ xxd:

0000000: 3137 3569 5f7c 5f5f 1bd3 2efb 3730 7d2f  175i_|__....70}/
0000010: b0f2                                     ..

ลองออนไลน์!

MATL, 15 ไบต์

'_|__'700:)70e!

แน่นอนคุณสามารถลองออนไลน์ได้! คำอธิบาย:

'_|__' % Put a brick on the stack
700    % 700 times
:)     % Makes a happy mason...
70e!   % Secret freemason code

ตกลงจริง ๆ แล้วมันทำงานดังนี้:

'_|__' % Put the first bit of the string on the stack
700:   % Put 1, 2, ..., 700 on the stack as array
)      % Index into the string, modularly. Result: '_|___|__ ... __'
70e    % Reshape into 70 rows (and consequently, 10 columns)
!      % Transpose to get the desired output.

Python 2, 46 44 Bytes

เพียงแค่ใช้การคูณสตริงเพื่อสร้างสตริงและการแบ่งเพื่อรับบิตขวา :)

k='_|__'*18
print'\n'.join([k[:70],k[2:]]*5)

^{ขอบคุณ Antony Hatchkins สำหรับการบันทึกสองไบต์ :)}

PowerShell v2 +, 34 30 ไบต์

'_|__'*175-split"(.{70})"-ne''

อัลกอริทึมการจับคู่โง่ regex ต้องการ-ne''... เสียห้าไบต์!

'_|__'*175-split"(.{70})"-ne''
'_|__'*175                     # Repeat this string 175 times
          -split"       "      # Split on this regex pattern:
                  .{70}        # Match any character 70 times
                 (     )       # Encapsulated in parens so we keep the regex results
                         -ne'' # But don't select the empty strings
                               # Output with newlines via Write-Output is implicit

บันทึก 4 ไบต์ด้วย Conor!

C, 131 115 113 103 97 95 ไบต์

i,j;main(){for(;i<10;puts(i++&1?"|__":"|"))for(j=0;j<18-(i&1);printf(&"|___"[j++?0:i&1?1:3]));}

ได้เวลาตีกอล์ฟแล้ว ...

_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__
_|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|__

เยลลี่ขนาด 14 ไบต์

“_|__”ṁ700s70Y

TryItOnline!

อย่างไร?

“_|__”ṁ700s70Y - Main link: no arguments
“_|__”         - literal ['_','|','_','_']
      ṁ700     - mould like something 700 long
          s70  - split into chunks of length 70
             Y - join with line feeds

MATL , 16 ไบต์

'___|'10:E!70:+)

ลองออนไลน์!

'___|'   % Push this string
10:E!    % Push [2; 4; 6; ...; 20] (10×1 column vector)
70:      % Push [1, 2, 3, ..., 70] (1×70 row vector)
+        % Add. Gives a 10×70 matrix of all pairwise additions
)        % Index (modular, 1-based) into the string

CJam , 15 ไบต์

"_|__"175*70/N*

ลองออนไลน์!

ท่าเรือคำตอบ 05AB1E Adnan ของ

"_|__"             e# Push this string
      175*         e# Repeat 175 times
          70/      e# Split in pieces of size 70
             N*    e# Join by newlines

Javascript REPL ขนาด 45 ไบต์

"_|__".repeat(175).match(/.{70}/g).join("\n")

JavaScript (ES6), 48 ไบต์

f=(n=350)=>n?(n%35?'_':`
_`)+"|_"[n%2]+f(n-1):""

เพราะการสอบถามซ้ำ

Bash, 44, 41 , 40 ไบต์

printf _\|__%.0s {1..175}|egrep -o .{70}

printf ทำให้มีความยาวบรรทัดเดียว 700 ตัวอักษร egrep จับคู่ได้ครั้งละ 70 ตัวอักษร

Befunge-98 , 63 bytes

'_\:3+4%0`!> #0 #\ #|' $ #\_\,1+:7a*%0`!> #0 #, #a_:7aa**\`!#@_

TryItOnline!

///, 51 ไบต์

หากบรรทัดใหม่ต่อท้ายได้รับอนุญาต:

/e/aaaa//a/_|__//b/eeeea_|//c/__eeeea//d/b
c
/ddddd

ลองออนไลน์!

Pyke ขนาด 12 ไบต์

w�"_|__"*TfX

ที่�เป็นตัวอักษร 163 ไบต์

ลองที่นี่! ( w�แทนที่ด้วยตัวอักษร)

Ruby ขนาด 30 ไบต์

ขอบคุณ manatwork สำหรับโซลูชันนี้

puts ("_|__"*175).scan /.{70}/

Ruby, 39 ไบต์

10.times{|i|puts ("_|__"*18)[i%2*2,70]}

Haskell, 56 47 ไบต์

unlines$[1..5]>>take 70.cycle<$>["_|__","___|"]