Faça um padrão em zigue-zague

25

Sua tarefa é receber uma entrada inteira e imprimir um padrão em zigue-zague usando barras e barras invertidas.

  • A entrada inteira determina o comprimento de cada zig e zag, bem como o número de zig e zags
  • O padrão sempre começa da direita para a esquerda

Casos de teste

4->
   /
  /
 /
/
\
 \
  \
   \
   /
  /
 /
/
\
 \
  \
   \
2->
 /
/
\
 \
0->
1->
/
8->
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
       /
      /
     /
    /
   /
  /
 /
/
\
 \
  \
   \
    \
     \
      \
       \
code-golf  ascii-art 
— Romulus3799
fonte
3
Podemos gerar uma matriz / lista de strings para cada linha? São permitidos treinamentos ou novas linhas ou espaços de liderança?
— Shaggy
2
O espaço em branco à esquerda está correto desde que o padrão não seja afetado?
— Emigna

Respostas:

10

C (gcc) , 108 102 101 98 80 76 72 bytes

  • Economizou seis bytes graças a Kevin Cruijssen ; remover parênteses e jogar golfe N-n-1paraN+~n
  • Salvou um byte movendo Zo incremento para a condição de loop
  • Salva três bytes usando em printf("%c\n",...)vez de putchar(...)e,puts("")
  • Salva dezoito (!) Bytes graças ao HatsuPointerKun ; usando printf("%*s",n,"");para imprimir nespaços em vez de usar um loop j;for(j=n;j--;)putchar(32);e combinar as duas printf(...);chamadas
  • Salva quatro bytes usando em printf("%*c",-~n,...);vez deprintf("%*s%c",n,"",...);
  • Economizou quatro bytes graças ao nwellnhof ; movendo tudo dentro de um loop em vez de dois
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);}

Experimente online!

— Jonathan Frech
fonte
Z,n,j;f(N){for(Z=0;Z<N;Z++)for(n=N;n--;putchar(Z%2?92:47),puts(""))for(j=Z%2?N+~n:n;j--;)putchar(32);} 102 bytes . Removidos os colchetes, colocando tudo dentro dos loops; e alterado N-n-1para N+~n.
— Kevin Cruijssen 22/09
1
@KevinCruijssen Thanks. Economizou outro byte trocando ambos Z%2?...:...e substituindo Z<N;Z++por Z++<N;.
— Jonathan Frech
1
Você pode salvar vários bytes usando a magia printf como fiz na minha resposta . Dessa forma, você se livrará do loop for usado para imprimir espaços. Para mais detalhes, veja esta resposta de estouro de pilha sobre espaços de preenchimento à esquerda com printf
— HatsuPointerKun
@HatsuPointerKun Thanks; que é realmente um caminho curto para repetir espaços em C.
— Jonathan Frech
4 bytes mais curto: i;f(N){for(i=0;i<N*N;i++)printf("%*c\n",i/N%2?i%N+1:N-i%N,i/N%2?92:47);}. Experimente online!
— Nwellnhof 22/09
10

Carvão , 16 10 9 bytes

ＦＮ«↖Ｉθ→‖Ｔ

Experimente online! Link é a versão detalhada do código.

— Neil
fonte
isso funciona ( InputNumberTambém foi quebrado no modo de golfe?)
— somente ASCII
@ Somente ASCII Não, portanto, os links separados para a versão sucinta especificada e a versão detalhada aproximada.
— Neil
Oh> _> não olhou para ver qual link eu estava abrindo
— somente ASCII
@ ASCII-only Bem, há apenas um link agora ;-)
— Neil
4

MATL , 17 bytes

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

Experimente online!

Explicação

:         % 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
— Luis Mendo
fonte
4

C # (.NET Core) , 117 103 101 bytes

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

Experimente online!

— meu pronome é monicareinstate
fonte
Você pode salvar 14 bytes como este: a=>{var o="";for(int z=a+1,e=0;e<a*a;)o+=(e++/a%2<1?"/".PadLeft(--z):@"\".PadLeft(z++))+"\n";return o;} 103 bytes Você não precisa de todos esses parênteses; você pode combinar o int; e adicione apenas +"\n"uma vez.
— Kevin Cruijssen
Oh uau, obrigado!
— meu pronome é monicareinstate
Hmm, você pode economizar mais 2 bytes, imprimindo diretamente, em vez de retornar uma string: a=>{for(int z=a+1,e=0;e<a*a;)System.Console.WriteLine(e++/a%2<1?"/".PadLeft(--z):@"\".PadLeft(z++));} 101 bytes
— Kevin Cruijssen
3

SOGL V0.12 , 13 12 9 bytes

╝F{±↔}P}ø

Experimente aqui!

pode ter 8 bytes ╝F{±↔}P}se o caso de teste 0 não for necessário

Explicação:

       }   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
— dzaima
fonte
3

Mathematica, 84 90 bytes

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

Não tenho idéia do porquê \é obviamente mais sombrio do que /.

insira a descrição da imagem aqui

— Keyu Gan
fonte
2
84 bytes(n=#;Grid@Array[If[Abs[n-(s=Mod[#-1,2n])-.5]==#2-.5,If[s<n,"/","\\"],""]&,{n^2,n}])&
— J42161217
3

Jq 1.5 , 94 89 bytes

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

Explicação

  ["/","\\"][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

Execução de amostra

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

Experimente online!

— jq170727
fonte
3

Java 8, 140 134 116 bytes

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 bytes graças a @Nevay .

Explicação:

Experimente aqui.

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
— Kevin Cruijssen
fonte
1
A condição do loop mais interno pode ser escrita como c-->f*(b-n-~b)(-6 bytes).
— Nevay 22/09
1
116 bytes: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;}
— Nevay
3

Javascript ES8, 83 79 78 76 75 74 71 bytes

* reduziu 1 byte com ES8 graças a Shaggy

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

Teste aqui

— DanielIndie
fonte
quem votou na minha solução, poderia explicar por quê? Estou esquecendo de algo?
— DanielIndie
2
Não fui eu quem votou mal, mas presumo que é porque as funções precisam ser repetíveis para serem válidas. O seu poderia ser corrigido facilmente, criando ium parâmetro padrão. A contagem de bytes também parece desativada.
— Emigna
1
A adição de um link TIO também é sempre bem-vinda, para que as pessoas possam testar facilmente sua solução.
— Emigna
1
@Emigna fixas (char sábio e Link sábio) :)
— DanielIndie
1
74 bytes com alguns ES8. Além disso, para JS, você pode usar apenas um snippet de pilha em vez de TIO.
— Shaggy
2

PowerShell , 81 bytes

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

Experimente online!

Ugh, isso é feio. Tanto código repetido, mais 7 bytes necessários para explicar 0um caso especial. Sugestões de golfe são bem-vindas.

— AdmBorkBork
fonte
2

Pitão, 17 bytes

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

Experimente online: Demonstração

Explicação:

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
— Jakube
fonte
2

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))

Obrigado a Jonathan Frech por apontar que a impressão não era necessária e que o primeiro zig era o caminho errado

— Bassintag
fonte
] for-> ]for.
— Jonathan Frech 22/09
Você não precisa de print(...), uma função retornando uma string seria válida. Além disso, acho que seu zig inicial está orientado da maneira errada (\ em vez de /).
— Jonathan Frech 22/09
@JonathanFrech Thanks! Eu mudei
— Bassintag 22/09/17
1
(abs(...)-1)-> ~-abs(...).
— Jonathan Frech 22/09
2

05AB1E , 17 16 bytes

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

Experimente online!

Explicação

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

Melhor tentativa atual usando a tela:

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

Java (OpenJDK 8) , 131 106 98 96 94 91 bytes

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)));}

Experimente online!

— Roberto Graham
fonte
1
Você pode remover muitos parênteses: i->{for(int j=0;j<i*i;System.out.printf("%"+(j/i%2<1?i-j%i+1:j%i+2)+"s",j++/i%2<1?"/\n":"\\\n"));}(98 bytes).
— Nevay 22/09
2

Dyalog APL , 39 36 35 34 bytes

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

Experimente online!

1 byte economizado graças a Zacharý

— dzaima
fonte
Dang it, me bateu por um byte. Você pode fazer ⎕IOser 0e remova ¯1+.
— Zachary
@ Zacharý Eu estava prestes a fazer isso: p
— dzaima
Ah, mais uma coisa: em (⌽,⊢)⍳⍵vez de(⌽⍳⍵),⍳⍵
— Zacharý 24/09
@ Zachary Sim, ainda estou para entender a tachas, tacitividade e coisas que vem com isso: /
— dzaima
Não se preocupe, eu não entendo completamente como os trens / garfos / o que eles chamam de trabalho também.
— Zachary
1

Excel VBA, 84 83 bytes

Função de janela imediata VBE anônima que leva a entrada do intervalo [A1]e sai para a janela imediata VBE

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

Haskell , 86 85 bytes

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

Experimente online!

Guardado um byte graças a Laikoni

Repita um zig ++ um zag e pegue as primeiras n*nlinhas.

— jferard
fonte
cycle$ ...em vez de cycle( ... )salvar um byte.
— Laikoni 22/09
@Laikoni thanks!
— Jferard
0

D , 105 bytes

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);}

Experimente online!

Retirado da resposta C ++ de HatsuPointerKun.

— Zacharý
fonte
Ao utilizar nosso site, você reconhece que leu e compreendeu nossa Política de Cookies e nossa Política de Privacidade.
Licensed under cc by-sa 3.0 with attribution required.