感谢Adnan提出了这一挑战。

在我休息之前，我的最后一个挑战。

任务

给定正整数n，如果n为奇数，则重复/多次；如果n是偶数，则重复\多次。

（严重的是，这些测试用例比本说明要清楚得多，因此只需看一下这些测试用例即可。）

眼镜

• 任何合理的输入/输出格式。
• 有标准漏洞。

测试用例

n output
1 /
2 \\
3 ///
4 \\\\
5 /////
6 \\\\\\

Javascript，22个字节

n=>"\\/"[n%2].repeat(n)

定义一个匿名函数。

如果仅*在Javascript中重复字符串。叹气

Python，20个字节

lambda n:'\/'[n%2]*n

05AB1E / 2sable，15 11 9 8字节

DÈ„/\sè×

-2个字节，感谢Leaky Nun

-1字节感谢Emigna

在线尝试！在05AB1E
或2sable中

Perl，20个字节

包括+1的 -p

使用STDIN上的输入运行：

squigly.pl <<< 6

squigly.pl

#!/usr/bin/perl -p
$_=$_%2x$_;y;01;\\/

视网膜 21

.+
$*/
T`/`\\`^(..)+$

在线尝试（添加第一行以允许运行多个测试用例）。

C＃，42个字节

string f(int n)=>new string("\\/"[n%2],n);

选择正确的字符，然后创建一个由该字符重复组成的新字符串n。

PHP，38字节

for(;$i++<$a=$argv[1];)echo'\/'[$a%2];

（38个字节）

while($i++<$a=$argv[1])echo'\/'[$a%2];

（38个字节）

<?=str_pad('',$a=$argv[1],'\/'[$a%2]);

（可变40个字节）

<?=str_repeat('\/'[($a=$argv[1])%2],$a);

C，40个字节

i;f(n){for(i=n;i--;)putchar(n%2?47:92);}

在Ideone上尝试

果冻，5个字节

ị⁾/\x

在线尝试！或验证所有测试用例。

ị⁾/\x

ị⁾/\    modular-indexing into the string "/\"
    x   repeat

J，10个字节

#'\/'{~2|]

这是一个六列动词，包括：

# ('\/' {~ 2 | ])

这是#和之间的钩子('\/' {~ 2 | ]); 钩子(f g) y扩展为y f (g y)，因此扩展为y # (... y)，对于单个字符，它产生一个y字符列表。

第二部分是5列火车，包括：

'\/' {~ 2 | ]

评估为两个分叉：

'\/' {~ (2 | ])

内叉的2 | ]模数为二。因此，外叉为：

'\/' {~ mod2

它从字符串中获取（{~）mod2索引（mod2）/。

然后，使用上方的挂钩：

y # (apt char)

这样就产生了我们想要的东西，我们完成了。

Haskell，25个字节

f n=cycle"\\/"!!n<$[1..n]

-1字节感谢Damien与cycle。

Mathematica，34 32 28字节

If[OddQ@#,"/","\\"]~Table~#&

匿名函数。以整数作为输入，并返回一个字符列表作为输出。

Powershell，30 27字节

更新：

param($n)('\','/')[$n%2]*$n

切换到param，由于timmyd。

"$("\/"[$args[0]%2])"*$args[0]

或更具可读性

("\","/")[$args[0]%2]*$args[0]

测试：

> 1..10 | % { ./run.ps1 $_ }
/
\\
///
\\\\
/////
\\\\\\
///////
\\\\\\\\
/////////
\\\\\\\\\\

Mathematica，29个字节

"\\"["/"][[#~Mod~2]]~Table~#&

残酷地利用了一个事实，即[[1]]返回到函数的第一个参数，而[[0]]返回到函数（头）本身，该事实适用于名为的奇怪有效的函数，该函数"\\"在处被“求值” "/"。

Ruby，15个字节

->n{'\/'[n%2]*n}

在eval.in上查看：https ://eval.in/632030

Fourier，27个字节

92~SI~N%2{1}{47~S}N(Sai^~i)

在线尝试！

Brachylog，15个字节

:2%:"\/"rm:?jbw

在线尝试！

说明

:2%                Input mod 2…
   :"\/"rm         …is the index of the element in string "\/",…
          :?j      …element that we juxtapose Input times to itself…
             bw    …and print to STDOUT after removing one slash/backslash

CJam，9个字节

ri_"\/"=*

在线尝试！

说明

ri     e# Read input and convert to integer N.
_      e# Duplicate N.
"\/"=  e# Use N as cyclic index into "\/", giving '\ for even and '/ for odd inputs.
*      e# Repeat N times.

> <>（鱼），30字节

:2%?'/'o1-:?!;30.
30.  >'\'50p

第一次使用这种语言，但我认为我至少通过有条件地将/用作输出的一部分或使用镜像来重定向流来节省了一点空间。虽然可能效率仍然很差，但我觉得至少可以减少一点。

输入是初始堆栈，输出是 stdout

在线尝试！

Dyalog APL，11 个字节

要求⎕IO←0在许多系统上是默认设置。

⊢⍴'\/'⊃⍨2|⊢

⊢ 论点

⍴ 重塑（重复）

'\/'⊃⍨ 由选择的字符串“ /”

2|⊢ 参数除以2时的除法余数

在线尝试APL！

Java 7，68 65字节

void c(int i){for(int x=0;x++<i;)System.out.print(i%2<1?92:'/');}

@ user902383和@SeanBean节省了3个字节。

就像这个答案一样，最短的代码高尔夫球似乎循环并打印。两者都是递归的，而且
void c(int i){System.out.print(new String(new char[i]).replace("\0",i%2<1?"\\":"/"));}
似乎更长。

取消测试代码：

在这里尝试。

class M{
  static void c(int i){
    for(int x = 0; x++ < i;){
      System.out.print(i % 2 < 1
                        ? 92
                        : '/');
    }
  }

  public static void main(String[] a){
    for(int i = 0; i < 10; i++){
      c(i);
      System.out.println();
    }
  }
}

输出：

/
\\
///
\\\\
/////
\\\\\\
///////
\\\\\\\\
/////////

R，47 46字节

n=scan();cat(rep(c("\\","/")[n%%2+1],n),sep="")

在R中，您必须转义反斜杠。该参数sep也必须完全指定，因为它是紧随其后的...。因此，几乎没有机会保存字符:(

感谢bouncyball为打高尔夫球而付出的努力。

T-SQL 50字节

当然STDIN这里没有，所以让我们假设这样的硬编码INT变量：DECLARE @ INT那么解决方案是：

PRINT IIF(@%2=0,REPLICATE('\',@),REPLICATE('/',@))

点，8字节

"\/"@aXa

直截了当。使用模块化索引选择字符并重复字符串以使其相乘。在线尝试！

这个问题提出了Pip，Pyth和Jelly之间的有趣比较，后两个分别得分5个字节。所有这三种语言都有隐式输出，带有单字符运算符用于模块化索引和字符串重复，并且不需要在字符串中转义反斜杠。但是，有两个主要区别：

1. 在某些情况下，Pyth和Jelly只需一个定界符即可定义字符串。
2. Pyth和Jelly的语法使得不需要在代码中明确表示输入（尽管由于非常不同的原因，正如Maltysen向我解释的那样））。

这些功能都不大可能出现在Pip ^1中（我不喜欢不平衡定界符的美感，无点语法或隐式操作数似乎对我的infix表达式解析器来说太陌生了），但是我我可以打第三小提琴 即使“可读性”在打高尔夫球时极为相关，我还是认为这三个额外的字节使Pip程序一目了然变得容易理解-在我的书中，这是一个值得权衡的问题。

_{¹虽然，Pip中的单字符字符串使用单个'定界符，这受CJam和Lisp中的引用的启发。}

Pyth，5个字节

*@"\/

测试套件。

模块化索引到字符串中\/，然后重复。

Perl 6、16个字节

{<\ />[$_%2]x$_}

用法：

for 1..6 {
  say $_, {<\ />[$_%2]x$_}( $_ )
}

1/
2\\
3///
4\\\\
5/////
6\\\\\\

朱莉娅，20个字节

!x="$("/\\"[x%2])"^x

SpecBAS-28个字节

1 INPUT n: ?"\/"(ODD(n)+1)*n

ODD如果number为奇数，则返回1，然后将其用作索引以打印n次正确的字符。SpecBAS字符串必须从字符1开始添加1。

Java 8，56字节

(i,j)->{for(j=i;j-->0;)System.out.print(i%2<1?92:'/');};

我要感谢@Kevin Cruijssen进一步打高尔夫球，进一步回答了我的问题。

非高尔夫球测试程序

public static void main(String[] args) {
    BiConsumer<Integer, Integer> consumer = (i, j) -> {
        for (j = i; j-- > 0;) {
            System.out.print(i % 2 < 1 ? 92 : '/');
        }
    };

    consumer.accept(5, 0);
    consumer.accept(1, 0);
    consumer.accept(8, 0);
}

其实是10个位元组

欢迎打高尔夫球。在线尝试！

;'\'/2(%I*

怎么运行的

       Implicit input of n
;      Duplicate n
'\'/   The strings "/" and "\"
2(%    n mod 2
I      If n mod 2, then "/", else "\"
*      Multiply by n. Implicit print at the end.