งานของคุณคือการป้อนข้อมูลจำนวนเต็มหนึ่งตัวและพิมพ์รูปแบบซิกแซกโดยใช้เครื่องหมายทับและแบ็กสแลช

• อินพุตจำนวนเต็มพิจารณาความยาวของ zig และ zag แต่ละรายการรวมถึงจำนวนของ zigs และ zags
• รูปแบบเริ่มต้นจากขวาไปซ้ายเสมอ

กรณีทดสอบ

4->
   /
  /
 /
/
\
 \
  \
   \
   /
  /
 /
/
\
 \
  \
   \
2->
 /
/
\
 \
0->
1->
/
8->
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \

C (gcc) , 108 102 101 98 80 76 72 ไบต์

• บันทึกหกไบต์ด้วยKevin Cruijssen ; การลบวงเล็บและการเล่นกอล์ฟN-n-1ไปที่N+~n
• บันทึกไบต์ด้วยการย้ายการZเพิ่มขึ้นของสภาพลูป
• บันทึกสามไบต์โดยใช้printf("%c\n",...)แทนputchar(...)และ,puts("")
• ไบต์สิบแปด (!) ที่บันทึกไว้ต้องขอบคุณHatsuPointerKun ; ใช้printf("%*s",n,"");เพื่อพิมพ์nช่องว่างแทนการใช้วนj;for(j=n;j--;)putchar(32);และรวมทั้งการprintf(...);โทร
• บันทึกสี่ไบต์โดยใช้printf("%*c",-~n,...);แทนprintf("%*s%c",n,"",...);
• บันทึกสี่ไบต์ต้องขอบคุณnwellnhof ; ย้ายทุกอย่างในวงเดียวแทนที่จะเป็นสองวง

j;f(k){for(j=0;j<k*k;j++)printf("%*c\n",j/k%2?j%k+1:k-j%k,j/k%2?92:47);}

ลองออนไลน์!

ถ่าน , 16 10 9 ไบต์

ＦＮ«↖Ｉθ→‖Ｔ

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด

MATL , 17 ไบต์

:"GXy@o?P47}92]*c

ลองออนไลน์!

คำอธิบาย

:         % Implicit input, n. Push range [1 2 ... n]
"         % For each k in that range
  G       %   Push n again
  Xy      %   Identity matrix of that size
  @       %   Push k
  o?      %   If it's odd
    P     %     Flip the matrix upside down
    47    %     Push 47 (ASCII for '/')
  }       %   Else
    92    %     Push 92 (ASCII for '\')
  ]       %   End
  *       %   Multiply each entry of the matrix by that number
  c       %   Convert to char. Char 0 is shown as space
          % Implicit end. Implicit display

C # (. NET Core) , 117 103 101 ไบต์

a=>{for(int z=a+1,e=0;e<a*a;)System.Console.WriteLine(e++/a%2<1?"/".PadLeft(--z):@"\".PadLeft(z++));}

ลองออนไลน์!

SOGL V0.12 , 13 12 9 ไบต์

╝F{±↔}P}ø

ลองที่นี่!

อาจเป็น 8 ไบต์╝F{±↔}P}หากไม่จำเป็นต้องใช้กรณีทดสอบ 0 ข้อ

คำอธิบาย:

       }   implicitly started loop repeated input times
╝            create a down-right diagonal of the input
 F           get the current looping index, 1-indexed
  {  }       that many times
   ±↔          reverse the diagonal horizontally
      P      print that
        ø  push an empty string - something to implicitly print if the loop wasn't executed

Python 2 , 69 68 62 ไบต์

^{-1 ไบต์ขอบคุณ Jonathan Frech}

lambda n:[[~i,i][i/n%2]%n*' '+'/\\'[i/n%2]for i in range(n*n)]

ลองออนไลน์!

Mathematica, 84 90 ไบต์

(n=#;Grid@Array[If[Abs[n-(s=Mod[#-1,2n])-.5]==#2-.5,If[s<n,"‌​/","\\"],""]&,{n^2,n‌​}])&

• ขอบคุณ Jenny_mathy สำหรับ -6 ไบต์

ผมมีความคิดว่าทำไมจะเห็นได้ชัดเข้มกว่า\/

Jq 1.5 , 94 89 ไบต์

["/","\\"][range($n)%2]as$s|range($n)|[(range(if$s=="/"then$n-.-1 else. end)|" "),$s]|add

คำอธิบาย

  ["/","\\"][range($n)%2] as $s                         # for $s= / \ / \ $n times 
| range($n)                                             # for .=0 to $n-1
| [(range(if $s=="/" then $n-.-1 else . end)|" "), $s]  # form list of spaces ending with $s
| add                                                   # concatenate

เรียกใช้ตัวอย่าง

$ jq -Mnr --argjson n 5 '["/","\\"][range($n)%2]as$s|range($n)|[(range(if$s=="/"then$n-.-1 else. end)|" "),$s]|add'
    /
   /
  /
 /
/
\
 \
  \
   \
    \
    /
   /
  /
 /
/
\
 \
  \
   \
    \
    /
   /
  /
 /
/

ลองออนไลน์!

Java 8, 140 134 116 ไบต์

n->{String r="";for(int a=0,b,c;a++<n;)for(b=n;b-->0;r+=a%2>0?"/\n":"\\\n")for(c=b-n+b|-a%2;++c<b;r+=" ");return r;}

-24 ไบต์ขอบคุณที่@Nevay

คำอธิบาย:

ลองที่นี่

n->{                // Method with integer parameter and String return-type
  String r="";      //  Result-String
  for(int a=0,b,c;  //  Index integers
      a++<n;)       //  Loop (1) from 0 to the input (exclusive)
    for(b=n;        //   Reset `b` to the input
        b-->0;      //   Inner loop (2) from the input to 0 (exclusive)
                    //     After every iteration: 
        r+=a%2>0?"/\n":"\\\n") 
                    //      Append either of the slashes + a new-line
      for(c=b-n+b|-a%2;++c<b;r+=" ");
                    //    Append the correct amount of spaces
                    //   End of inner loop (2) (implicit / single-line body)
                    //  End of loop (1) (implicit / single-line body)
  return r;         //  Return the result-String
}                   // End of method

Javascript ES8, 83 79 78 76 75 74 71 ไบต์

* ลดลง 1 ไบต์ด้วย ES8 เนื่องจาก Shaggy

A=(m,i=0)=>i<m*m?`/\\`[x=i/m&1].padStart(x?i%m+1:m-i%m)+`
`+A(m,++i):""

ทดสอบที่นี่

Pyth , 20 ไบต์

Lm+*;dbQjs<*,_y\/y\\

ลองออนไลน์!

PowerShell , 81 ไบต์

param($a)if($a){1..$a|%{((1..$a|%{" "*--$_+'\'}),($a..1|%{" "*--$_+'/'}))[$_%2]}}

ลองออนไลน์!

ฮึนี่มันช่างน่าเกลียด รหัสซ้ำจำนวนมากบวก 7 ไบต์ที่จำเป็นสำหรับบัญชี0กรณีพิเศษ ยินดีต้อนรับคำแนะนำการเล่นกอล์ฟ

Pyth, 17 ไบต์

js<*_+RV"\/"_B*L;

ลองใช้งานออนไลน์: การสาธิต

คำอธิบาย:

js<*_+RV"\/"_B*L;QQQ   implicit Qs at the end
              *L;Q     list with ["", " ", "  ", ..., " "*(input-1)]
            _B         bifurcate with reverse: [["" to "   "], ["   " to ""]]
     +RV"\/"           append to each one either "\" or "/": 
                       [["\", to "   \"], ["   /" to "/"]]
    _                  reverse
   *              Q    repeat input times
  <                Q   but only take the first input many
 s                     flatten the list of lists
j                      print on each line

Python 3: 90 Bytes 82 Bytes

lambda n:"\n".join(" "*(abs(i%(n*2)-n+i//n%2)-1)+"/\\"[i//n%2]for i in range(n*n))

ขอบคุณ @Jonathan Frech ที่ชี้ให้เห็นว่าการพิมพ์นั้นไม่จำเป็นและซิกแซกแรกนั้นผิดวิธี

05AB1E , 17 16 ไบต์

F<„/\Nèú.sNƒR}»,

ลองออนไลน์!

คำอธิบาย

F                  # for N in [0 ... input-1] do
  „/\              # push the string "/\"
     Nè            # cyclically index into this string with N
 <     ú           # prepend input-1 spaces to this string
        .s         # get suffixes
          NƒR}     # reverse the list of suffixes input+1 times
              »,   # join on newline and print

ความพยายามที่ดีที่สุดในปัจจุบันโดยใช้ Canvas:

F„/\Nè©53NèΛ2®ð«4Λ

C ++, 92 91 ไบต์

-1 ไบต์ขอบคุณKevin Cruijssen

void m(int n){for(int i=0,j;i<n;++i)for(j=0;j<n;++j)printf("%*c\n",i%2?j+1:n-j,i%2?92:47);}

ขอบคุณพลังแห่งเวทย์มนตร์ printf

Java (OpenJDK 8) , 131 106 98 96 94 91 ไบต์

i->{for(int j=0;j<i*i;System.out.printf("%"+(j/i%2<1?i-j%i:j%i+1)+"c\n",47+45*(j++/i%2)));}

ลองออนไลน์!

Dyalog APL , 39 36 35 34 ไบต์

{↑((,⍵ ⍵⍴(⌽,⊢)⍳⍵)/¨' '),¨⍵/⍵⍴'/\'}

ลองออนไลน์!

บันทึก 1 ไบต์ขอบคุณZacharý

Perl 5 , 70 + 1 ( -n) = 71 ไบต์

$n=$_**2;$_=$"x--$_.'/';say&&s% /%/ %||s%\\ % \\%||y%\\/%/\\%while$n--

ลองออนไลน์!

Kotlin , 102 ไบต์

(0..q-1).map{r->if(r%2<1)q-1 downTo 0 else{0..q-1}.map{(1..it).map{print(' ')};println('/'+45*(r%2))}}

ลองออนไลน์!

Excel VBA, ₈₄ 83 ไบต์

ฟังก์ชันหน้าต่าง VBE แบบไม่ระบุชื่อทันทีที่รับอินพุตจากช่วง[A1]และเอาต์พุตไปยังหน้าต่างทันที VBE

For i=1To[A1]:For j=1To[A1]:?IIf(i mod 2,Space([A1]-j)&"/",Space(j-1)&"\"):Next j,i

เยลลี่ 15 ไบต์

ḶṚ⁶ẋm0ż⁾/\x$ṁ²Y

ลองออนไลน์!

โปรแกรมเต็มรูปแบบ

Haskell , 86 85 ไบต์

f n=take(n*n)$cycle$[(' '<$[x..n-1])++"/"|x<-[1..n]]++[(' '<$[2..x])++"\\"|x<-[1..n]]

ลองออนไลน์!

บันทึกหนึ่งไบต์ขอบคุณ Laikoni

ทำซ้ำ zig ++ a zag แล้วจดn*nบรรทัดแรก

J , 39 35 33 32 25 ไบต์

' /\'{~[,/@$(|.,:+:)@=@i.

ลองออนไลน์!

Dyalog APL, 41 40 ไบต์

⎕IO0จะต้องเป็น

{⍪/((⌽⍵ ⍵⍴S↑'/')(⍵ ⍵⍴'\'↑⍨S←⍵+1))[2|⍳⍵]}

ลองออนไลน์!

D , 105 ไบต์

import std.stdio;void m(T)(T n){for(T i,j;i<n;++i)for(j=0;j<n;++j)printf("%*c\n",i%2?j+1:n-j,i%2?92:47);}

ลองออนไลน์!

ยกมาจากคำตอบ C ++ ของ HatsuPointerKun