Produzir um trapézio mágico 8

41

Sua tarefa é produzir um Magical 8 Trapezium:

        1 × 8 + 1 = 9
       12 × 8 + 2 = 98
      123 × 8 + 3 = 987
     1234 × 8 + 4 = 9876
    12345 × 8 + 5 = 98765
   123456 × 8 + 6 = 987654
  1234567 × 8 + 7 = 9876543
 12345678 × 8 + 8 = 98765432
123456789 × 8 + 9 = 987654321
  • Saída no idioma escolhido no menor número de bytes possível.
  • Observe o número de espaços no início de cada linha para manter a forma do trapézio.
  • Espaços à direita são permitidos.
  • Você pode usar ×ou a letra x - o que você preferir.
rybo111
fonte
11
Relacionado. (levemente ...) #
9307 Martin Ender
Espaços intermediários são obrigatórios, sim?
Value Ink
@ KevinLau-notKenny é, mas você sempre pode postar uma alternativa também, se for significativa.
rybo111
São 6 bytes correspondentes aos 6 espaços no meio, então não, acho que não é significativo o suficiente.
Value Ink

Respostas:

15

Python 2, 59 bytes

a=i=1
exec"print'%9d x 8 +'%a,i,'=',a*8+i;i+=1;a=a*10+i;"*9

Os números ae ia equação a * 8 + isão gerados aritmeticamente. Cada linha ié incrementada e atem o próximo dígito anexado via a=a*10+i. Por exemplo, se a=12345, i=5, então ise torna 6, então o novo aé o 12345*10 + 6que é 123456.

Armazená-los como números, em vez de cadeias, permite calcular o RHS conforme indicado pela equação a*8+i, que é mais curta que a reversão de cadeias.

xnor
fonte
+1 para ver este para o que é - uma soma que pode ser gerada
rybo111
7

V , 37 bytes

i¸ 1 X 8 + 1 = 98ñYp|Eylp^Xf+$ylp

Experimente online!

Contém não imprimível, então aqui está um hexdump:

00000000: 69c2 b820 3120 5820 3820 2b20 3120 3d20  i.. 1 X 8 + 1 = 
00000010: 391b 38c3 b159 707c 4579 6c70 015e 5866  9.8..Yp|Eylp.^Xf
00000020: 2b01 2479 6c70 18                        +.$ylp.
DJMcMayhem
fonte
5

05AB1E , 32 31 30 28 bytes

Código:

TG9N-ð×NLJðN"x8+ÿ="€ðJžmN£J,

Usa a codificação CP-1252 . Experimente online! .

Adnan
fonte
.cnão é utilizável aqui?
Magic Octopus Urn
@carusocomputing É, mas isso é posterior ao desafio.
Adnan
Ahhh ... Não viu o timestamp.
Magic Octopus Urn
5

PHP, 105 89 60 57 bytes

minha primeira tentativa de golfe aqui (graças a manatwork & user55641)

for(;$i++<9;)printf("%9s x 8 + $i = %s
",$s.=$i,$s*8+$i);

59.

for(;$i++<9;)printf("%9s x 8 + $i = %s
",$s.=$i,$t.=10-$i);

89 (minha própria tentativa)

for(;@++$i<=9;){printf("%9s x 8 + %s = %s\n",join(range(1,$i)),$i,join(range(9,10-$i)));}

105 (primeiro)

for($j='123456789';@$j[$i++];){printf("%9s x 8 + %s = %s\n",substr($j,0,$i),$i,strrev(substr($j,-$i)));}
Crypto
fonte
11
Não há necessidade de aparelhos em torno de uma única declaração. Só o $ i é melhor interpolado diretamente na cadeia de caracteres sem o especificador de formato.
manatwork 27/07/16
11
Você pode eliminar mais 23 bytes com alguns truques: Alterar @ ++ $ i <= 9 para $ i ++ <9 economiza 2 bytes. Você não precisa silenciar avisos, pois eles não param a execução e, de acordo com as regras padrão do PPCG, você pode ignorar o stderr, se desejar. Alterar \ n para um caractere de nova linha real salva um byte. Alterar os bits de junção (intervalo (...)) para $ s. = $ Ie $ t. = 10- $ i salva 15 bytes. Isso funciona porque as atribuições retornam o valor atribuído e é praticamente o truque mais valioso que encontrei no php para golfe. Os últimos 5 bytes são detalhados pelo manatwork acima
user55641 27/07
11
Você pode eliminar mais 2 bytes substituindo $t.=10-$ipor $s*8+$i. tio.run/##K8go@G9jXwAk0/…
640 KB
11
São 59 bytes. E em $s*8+$ivez de $t.=10-$isalvar mais dois.
Titus
5

Pitão, 32 bytes

VS9ss[*dK-9NSN" x 8 + "N" = "r9K

Experimente online!

VS9ss[*dK-9NSN" x 8 + "N" = "r9K
VS9                                  # For N in 1..9
   s                                 # Join without delimiter
    s[                               # Reduce the array on + (flattens)
      *dK-9N                         # - Space, repeated K=(9-N) times
            SN                       # - The string sequence 1..N
              " x 8 + "              # - This string literal
                       N             # - N itself
                        " = "        # - This string literal
                             r9K     # - The string sequence 9..K

Obrigado a @FryAmTheEggman por salvar 2 bytes. Obrigado a @KennyLau por salvar 3 bytes.

Ven
fonte
snão se une ao espaço - se une sem delimitador.
Isaacg
@isaacg hah, e agora eu estou pensando que eu poderia salvar um byte juntando-se com o espaço
Ven
A contagem de bytes seria a mesma .
Leaky Nun em
4

CJam, 39 38 36 bytes

Agradecemos ao Optimizer por economizar 2 bytes.

9{)_,:)9Se[" x 8 + "@S'=S9_,fm4$<N}/

Teste aqui.

Contagem de mesmos bytes:

9{)_,:)9Se[]"x8+"+:\'=9_,f-Y$<]S*n}/

Isso requer a versão mais recente, disponível em Experimente online!

Martin Ender
fonte
9
@Optimizer fez jus ao seu nome, então!
rybo111
4

Python 2, 87 84 78 75 bytes

s="123456789"
n=1
exec'print"%9s"%s[:n],"x 8 + %s ="%n,s[::-1][:n];n+=1;'*9

Experimente online

Uma versão anterior usa alguma mágica de cordas.

R=range(1,10)
for n in R:print" "*(9-n)+`R`[1:n*3:3]+" x 8 + %d = "%n+`R`[-2:27-3*n:-3]

A conversão range(1,10)para uma string fornece [1, 2, 3, 4, 5, 6, 7, 8, 9], e isso é bom, já que todo número é apenas um dígito. Portanto, 123456789é fácil obter a string disso `range(1,10)`[1::3]. O intervalo invertido é `range(1,10)`[-2::-3]. Em seguida, para chegar apenas ao nível desejado para cada iteração, corte-a em um 3*nou em 3*(9-n)( 27-3*n) para os dígitos invertidos.

mbomb007
fonte
Você pode fazer for n in range(1,10):print"%9s"%s[:n]+" x 8 + %s = "%n+s[::-1][:n]por 80 bytes.
TheBikingViking
s="123456789";n=1;exec'print"%9s"%s[:n],"x 8 + %s ="%n,s[::-1][:n];n+=1;'*9economiza mais três! Até 75.
Lynn
Bom, obrigado pela ajuda! Pena que eu tive que dobrar-slice pela segunda vez ...
mbomb007
4

Perl, 49 bytes

printf"%9s x 8 + $_ = %s
",$@.=$_,$_+8*$@for 1..9

Uso

perl -e 'printf"%9s x 8 + $_ = %s
",$@.=$_,$_+8*$@for 1..9'
Dom Hastings
fonte
4

Ruby, 77 73 65 60 bytes

Experimente online ~

Principais reformulações de @manatwork

Outra revisão do @xsot

a=i=0;9.times{puts"%9d x 8 + %d = %d"%[a=a*10+i+=1,i,a*8+i]}
Value Ink
fonte
Parece ser mais curto com string de formato: puts'%9d x 8 + %d = %d'%[k=[*1..i]*'',i,k.to_i*8+i].
26616 manatwork
(1..9).map1.upto(9)
manatwork
Ah, eu não sabia nada sobre %9dser uma opção de formatação para números inteiros almofada como essa
Valor de tinta
60:a=i=0;9.times{puts"%9d x 8 + %d = %d"%[a=a*10+i+=1,i,a*8+i]}
xsot
@xsot isso é ótimo! Não pensou em calcular o número inicial assim.
Value Ink
4

Java 10, 151 133 130 129 126 110 bytes

v->{String p="\n",r="";for(int n=123456789,i=9;i>0;n/=10,p+=" ")r=p+n+" x 8 + "+i+" = "+(n*8+i--)+r;return r;}

Experimente online.

Explicação:

v->{                   // Method with empty unused parameter and String return-type
  String p="\n",       //  Prefix-String, starting at a newline
         r="";         //  Result-String, starting empty
  for(int n=123456789, //  Multiply-number, starting at 123456789
      i=9;i>0          //  Loop `i` in the range [9, 0):
      ;                //    After every iteration:
       n/=10,          //     Remove the last digit from the integer
       p+=" ")         //     Append a space after the prefix
    r=...+r;           //   Prepend the following to the result-String:
      p                //    The prefix-String
      +n               //    Followed by the integer
      +" x 8 + "       //    Followed by the literal String " x 8 + "
      +i               //    Followed by the loop-index `i`
      +" = "           //    Followed by the literal String " = "
      +(n*8+i--)       //    Followed by the result of that equation
  return r;}           //  Return the result-String
Kevin Cruijssen
fonte
11
Eu acho que você poderia salvar bytes usando em xvez do sinal de multiplicação.
Wizzwizz4
11
Você pode salvar um par de bytes por inicializar sa "\n"e retirando "\n"+do forcircuito
cliffroot
@ wizzwizz4 Obrigado. Deveria ter sabido ×é de 2 bytes em vez de 1, como x..
Kevin Cruijssen
Você não está adicionando sao resultado em cada iteração também?
Cliffroot
Eu sei que isso é velho, mas você não pode fazer em return ovez de System.out.print(o)? Além disso, você pode alterar para o Java 10 e salvar com vare lambdas
Modalidade de Ignorância
3

C, 74 bytes

d(i,n){for(i=n=1;i<10;n=++i+n*10)printf("%9d x 8 + %d = %d\n",n,i,n*8+i);}
anatolyg
fonte
3

C #, 113 bytes

void f(){for(int n=1,i=1;i<10;n=10*n+ ++i)Console.WriteLine(new string(' ',9-i)+n+" x "+"8 + "+i+" = "+(n*8+i));}

se você tiver alguma maneira de melhorar esta solução, sinta-se à vontade para compartilhar.

ScifiDeath
fonte
Você pode economizar 1 byte removendo um espaço: ;n=10*n+ ++ino loop for pode ser alterado para ;n=++i+10*n. Além disso, +" x "+"8 + "+pode ser alterado para +" x 8 + "+. para salvar mais 3 bytes.
Kevin Cruijssen 27/07
void f () {for (int n = 1, i = 1; i <10; n = ++ i + 10 * n) Console.WriteLine ($ "{nova string ('', 9-i)} {n } x 8 + {i} = {(n * 8 + i)} ");} ------------ economizou um byte!
downrep_nation
3

Lote, 117 bytes

@echo off
set a=         12345678987654321
for /l %%i in (1,1,9)do call echo %%a:~%%i,9%% x 8 + %%i = %%a:~17,%%i%%

Sim, isso significa 16% de sinais em uma linha; isso é lote para você!

Neil
fonte
2

Haskell, 92 bytes

s=(show=<<)
[1..9]>>= \x->([x..8]>>" ")++s[1..x]++" x 8 + "++s[x]++" = "++s[9,8..10-x]++"\n"

Como funciona:

s=(show=<<)                   -- helper function that turns a list of numbers into
                              -- a string without delimiters, e.g. [1,2] -> "12"

[1..9]>>=                     -- for each number 1 to 9
     ([x..8]>>" ")            -- take length of [x..8] copies of a space
     s[1..x]                  -- the digits from 1 to x
     " x 8 + "                -- a string literal
     s[x]                     -- the digit of x
     " = "                    -- another string literal
     s[9,8..10-x]             -- the digits from 9 down to 10-x
     "\n"                     -- an a newline
nimi
fonte
2

Retina , 66 bytes

A contagem de bytes assume a codificação ISO 8859-1. O avanço de linha principal é significativo.


123456789!9 = 987654321
+`^((.)+)\B.!.(.+).
 $1!$2$3¶$&
!
 x 8 + 

Experimente online!

Martin Ender
fonte
2

Pyke, 30 29 bytes

9Fd*~utj+9<\x8\+9i-\=ji>_dJ)X

Experimente aqui!

9F                         )  -  for i in range(9):
  d*                          -       " " * i
        +                     -      ^ + V
       j                      -       j = V
    ~ut                       -        "123456789"
         9<                   -     ^[:9]
           \x8\+9i-\=         -    [^, "x", 8, "+", (9-i), "=", V]
                        _     -     reversed(V)
                     ji>      -      j[i:]
                         dJ   -   " ".join(^)
                            X - print(reversed(^))
Azul
fonte
2

PowerShell v2 +, 85 64 58 57 52 bytes

8..0|%{" "*$_+-join(1..++$i+" x 8 + $i = "+9..++$_)}

Loops de 8 a 0 8..0|%{...}através do operador de faixa. A cada iteração, produzimos uma concatenação de string composta por (o número apropriado de espaços " "*$_), mais uma -joinstring ed de (um intervalo de 1até um número auxiliar pré-incrementado ++$i, mais o bit do meio " x 8 + $i = ", mais o intervalo final do 9número atual $_pre -incrementado).

Um grande truque aqui é alavancar a "preferência de esquerda" para a tipografia, o que nos permite "adicionar" matrizes dentro das -joinparênteses, o que significa que usamos apenas um -joinoperador.

Exemplo

PS C:\Tools\Scripts\golfing> .\magical-8-trapezium.ps1
        1 x 8 + 1 = 9
       12 x 8 + 2 = 98
      123 x 8 + 3 = 987
     1234 x 8 + 4 = 9876
    12345 x 8 + 5 = 98765
   123456 x 8 + 6 = 987654
  1234567 x 8 + 7 = 9876543
 12345678 x 8 + 8 = 98765432
123456789 x 8 + 9 = 987654321
AdmBorkBork
fonte
4
%{Seus olhos estão bem?
Gcampbell
@gcampbell Se seus olhos parecessem assim, você também estaria carrancudo.
AdmBorkBork
Depende de como sua fonte renderiza porcentagens.
Gcampbell
2

MATL , 38 36 35 bytes

9:"9@-Z"@:!V' x 8 + '@VO61O58@:-v!D

Experimente online!

Luis Mendo
fonte
2

J, 51 bytes

(|."1|.\p),.' x 8 + ',"1]p,.' = ',"1]\|.p=:u:49+i.9

Cria a sequência 123456789e, em seguida, opera em prefixos e sufixos para criar a saída.

Uso

   (|."1|.\p),.' x 8 + ',"1]p,.' = ',"1]\|.p=:u:49+i.9
        1 x 8 + 1 = 9        
       12 x 8 + 2 = 98       
      123 x 8 + 3 = 987      
     1234 x 8 + 4 = 9876     
    12345 x 8 + 5 = 98765    
   123456 x 8 + 6 = 987654   
  1234567 x 8 + 7 = 9876543  
 12345678 x 8 + 8 = 98765432 
123456789 x 8 + 9 = 987654321
milhas
fonte
2

JavaScript ES6 (88)

Aproveitando o novo repeatmétodo, backticks e modelos ...

i=10;for(y="";--i;)console.log(`${" ".repeat(i)+(y+=(x=10-i))} x 8 + ${x} = ${y*8+x}\n`)
WallyWest
fonte
bom trabalho mano, você deve considerar remover algum espaço e usar em alertvez de console.log, ele pode economizar alguns bytes!
chau giang 14/04
Dado que eu respondi isso pouco antes da meia-noite, acho que estava quase dormindo ... publicarei uma atualização sobre isso em breve. LOL
WallyWest 14/04
2

R, 107 103 bytes

a=1;for(i in 2:10){cat(rep("",11-i),paste(a,"x",8,"+",(i-1),"=",strtoi(a)*8+(i-1)),"\n");a=paste0(a,i)}

Ungolfed:

a=1

for(i in 2:10)
    cat(rep("",11-i),paste(a,"x",8,"+",(i-1),"=",strtoi(a)*8+(i-1)),"\n")
    a=paste0(a,i)

Resultado:

        1 x 8 + 1 = 9 
       12 x 8 + 2 = 98 
      123 x 8 + 3 = 987 
     1234 x 8 + 4 = 9876 
    12345 x 8 + 5 = 98765 
   123456 x 8 + 6 = 987654   
  1234567 x 8 + 7 = 9876543 
 12345678 x 8 + 8 = 98765432 
123456789 x 8 + 9 = 987654321
Frédéric
fonte
96 bytes
Giuseppe
2

APL (Dyalog Unicode) , 61 52 39 bytes SBCS

↑(⍳9)((¯9↑↑),' x 8 +',⊣,'= ',↑∘⌽)¨⊂1↓⎕D

Experimente online!

-9 bytes usando o 10⊥truque para analisar o número, em vez de uma redução. Obrigado a @ Adám por -13!

Explicação:

    ((¯9↑↑),' x 8 +',⊣,'= ',↑∘⌽)¨⊂1↓⎕D
                                     D   Numbers from 0 to 9
                                   1     Drop the 0
 (⍳9)(                          )¨⊂       Do 9 times, N=current
                             ↑∘⌽          Reverse the string (9..1) and cut off N elements
                                         N itself
      (   ↑)                              Drop N elements off the 1..9 string...
      9 )                              ...then pad it back with spaces
            ,' x 8 +', ,'= ',             Join with a few constant strings
                                         Format
Ven
fonte
1

JavaScript (ES6), 99 bytes

_=>[...Array(9)].map((n,i)=>`${n="        123456789".substr(i,9)} x 8 + ${++i} = ${n*8+i}`).join`\n`
_=>".........".replace(/./g,(n,i)=>`${n="        123456789".substr(i,9)} x 8 + ${++i) = ${n*8+i}\n`)

Onde \nrepresenta um caractere literal de nova linha. A segunda versão gera uma nova linha à direita. Eu vim com uma fórmula para os números, ('1'.repeat(9-i)+0+i)/9mas o preenchimento era mais fácil de fazer dessa maneira.

Neil
fonte
1

Brainfuck , 232 bytes

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

Experimente online!

Pode ser jogado muito mais longe ...

Freira Furada
fonte
1

Javascript (usando biblioteca externa) (143 bytes)

n=>_.Range(1,9).WriteLine(v=>_.Range(0,10-v).Write("",x=>" ")+_.Range(1,v).Write("")+" x 8 + " + v + " = "+_.Range(10-v,v).Reverse().Write(""))

Link para lib: https://github.com/mvegh1/Enumerable/

Explicação do código: Crie o intervalo de 1 a 9 e, para cada valor, escreva uma linha correspondente ao predicado complexo. O predicado recebe o valor inteiro atual e cria um intervalo que mede 10 elementos currentValue, a fim de criar tantos espaços. Esses espaços são concatenados com a parte da fórmula da linha e, em seguida, são concatenados com a final do intervalo que corresponde ao número de elementos como front-end, na ordem inversa.

Nota: Na imagem, a primeira linha está desativada em um espaço porque o console adicionou aspas, pois o valor de retorno é uma sequência. O valor real está formatado corretamente

insira a descrição da imagem aqui

applejacks01
fonte
1

05AB1E , 24 bytes

9Lε©LJ'x8'+®'=T®L-Jðý}.c

Experimente online!

Usa uma versão mais recente que o desafio, que agora é permitido.

Erik, o Outgolfer
fonte
Não é muito, mas na versão ainda mais recente do 05AB1E você pode remover o ©e alterar ®para ypara salvar um byte.
Kevin Cruijssen 10/04
@KevinCruijssen Eh, geralmente não "atualizo" respostas antigas como essa. Além disso, a "versão mais recente" é uma linguagem totalmente diferente (diferentes implementações).
Erik the Outgolfer
1

VBA (Excel), 51 bytes

Usando janela imediata

For z=1To 9:a=a &z:?Spc(9-z)a" x 8 +"z"="a*8+z:Next
remoel
fonte
0

k (77 bytes)

Provavelmente poderia ser encurtado um pouco mais

-1@'((|t)#\:" "),'(t#\:n),'" x 8 + ",/:n,'" = ",/:(t:"I"$'n)#\:|n:"123456789";

Exemplo:

k)-1@'((|t)#\:" "),'(t#\:n),'" x 8 + ",/:n,'" = ",/:(t:"I"$'n)#\:|n:"123456789";
         1 x 8 + 1 = 9
        12 x 8 + 2 = 98
       123 x 8 + 3 = 987
      1234 x 8 + 4 = 9876
     12345 x 8 + 5 = 98765
    123456 x 8 + 6 = 987654
   1234567 x 8 + 7 = 9876543
  12345678 x 8 + 8 = 98765432
 123456789 x 8 + 9 = 987654321
skeevey
fonte
0

golflua, 56 caracteres

p=""~@i=1,9p=p..i; w(S.q("%9s x 8 + %d = "..p*8+i,p,i))$

Exemplo de execução:

bash-4.3$ golflua -e 'p=""~@i=1,9p=p..i; w(S.q("%9s x 8 + %d = "..p*8+i,p,i))$'
        1 x 8 + 1 = 9
       12 x 8 + 2 = 98
      123 x 8 + 3 = 987
     1234 x 8 + 4 = 9876
    12345 x 8 + 5 = 98765
   123456 x 8 + 6 = 987654
  1234567 x 8 + 7 = 9876543
 12345678 x 8 + 8 = 98765432
123456789 x 8 + 9 = 987654321
homem a trabalhar
fonte