21

Verwenden Sie eine beliebige Programmiersprache, um Zahlen zwischen 1 und 99 (einschließlich beider) so anzuzeigen, dass:

Die Zahlen sind durch ein einzelnes Leerzeichen getrennt.
Wenn eine Zahl durch 3 teilbar ist, sollte sie in Klammern stehen.
Wenn eine Zahl durch 4 teilbar ist, sollte sie in eckigen Klammern stehen.
Wenn eine Zahl sowohl durch 3 als auch durch 4 teilbar ist, sollte sie sowohl in Klammern als auch in eckigen Klammern angegeben werden (wobei eckige Klammern näher an der Zahl stehen).

Ihr Programm sollte genau anzeigen:

1 2 (3) [4] 5 (6) 7 [8] (9) 10 11 ([12]) 13 14 (15) [16] 17 (18) 19 [20] (21) 22 23 ([24]) 25 26 (27) [28] 29 (30) 31 [32] (33) 34 35 ([36]) 37 38 (39) [40] 41 (42) 43 [44] (45) 46 47 ([48]) 49 50 (51) [52] 53 (54) 55 [56] (57) 58 59 ([60]) 61 62 (63) [64] 65 (66) 67 [68] (69) 70 71 ([72]) 73 74 (75) [76] 77 (78) 79 [80] (81) 82 83 ([84]) 85 86 (87) [88] 89 (90) 91 [92] (93) 94 95 ([96]) 97 98 (99)

code-golf kolmogorov-complexity Monolica
quelle

6

3

Können wir jeden Eintrag in einer neuen Zeile ausgeben, oder muss die Ausgabe nur in einer Zeile erfolgen?

ETHproductions

4

Kann die Ausgabe mit einem Leerzeichen enden? Einige Antworten scheinen dies anzunehmen.

Dennis

7

05AB1E , 23 Bytes

-1 Byte dank Kevin Cruijssen

тGND4Öi…[ÿ]}N3Öi…(ÿ)]ðý

Probieren Sie es online!

Okx
quelle

1

-1 Byte durch Ändern }?ð?in ]ðý(schließen Sie sowohl die if als auch die Schleife und verbinden Sie den gesamten Stapel durch Leerzeichen)

Kevin Cruijssen

@ KevinCruijssen Danke, das war genau das, wonach ich gesucht habe!

Okx

-1 mitÅ€

Grimmy

6

Python 2 , 68 65 60 Bytes

i=0
exec"i+=1;print'('[i%3:]+`[i][i%4:]or i`+')'[i%3:],;"*99

Probieren Sie es online!

ovs
quelle

1

Ich hatte recht :) +1

ElPedro

5

R , 61 Bytes

"+"=c
r=""+""
cat(paste0(r+"(",r+""+"[",1:99,r+""+"]",r+")"))

Probieren Sie es online!

J.Doe
quelle

2

Geniales Aliasing!

Giuseppe

Wie funktioniert das überhaupt? Das ist erstaunlich! +1 an dich, mein Freund

Sumner18

4

Jelly , 21 bis 20 Bytes

³Ṗµ3,4ṚƬḍ×“([“])”j)K

Probieren Sie es online!

Wie es funktioniert

³Ṗµ3,4ṚƬḍ×“([“])”j)K  Main link. No arguments.

³                     Set the return value to 100.
 Ṗ                    Pop; yield [1, ..., 99].
  µ               )   Map the chain in between over [1, ..., 9]; for each integer k:
   3,4                    Set the return value to [3, 4].
      ṚƬ                  Reverse until a loop is reached. Yields [[3, 4], [4, 3]].
        ḍ                 Test k for divisibility by [[3, 4], [4, 3]], yielding a
                          matrix of Booleans.
         ×“([“])”         Repeat the characters of [['(', '['], [']', ')']] as many
                          times as the Booleans indicate.
                 j        Join the resulting pair of strings, separated by k.
                   K  Join the resulting array of strings, separated by spaces.

Dennis
quelle

3

D , 110 Bytes

import std.stdio;void f(){for(int i;i<99;)write(++i%3?"":"(",i%4?"":"[",i,i%4?"":"]",i%3?"":")",i%99?" ":"");}

Probieren Sie es online!

Portiert von der C ++ - Antwort von @ HatsuPointerKun.

Zacharý
quelle

3

Kohle , 30 Bytes

⪫ＥＥＥ⁹⁹Ｉ⊕ι⎇﹪⊕κ⁴ι⪫[]ι⎇﹪⊕κ³ι⪫()ι

Probieren Sie es online! Link ist eine ausführliche Version des Codes. Erläuterung:

    ⁹⁹                          Literal 99
   Ｅ                            Map over implicit range
        ι                       Current value
       ⊕                        Incrementd
      Ｉ                         Cast to string
  Ｅ                             Map over list of strings
            κ                   Current index
           ⊕                    Incremented
             ⁴                  Literal 4
          ﹪                     Modulo
              ι                 Current value
                []              Literal string `[]`
                  ι             Current value
               ⪫                Join i.e wrap value in `[]`
         ⎇                      Ternary
 Ｅ                              Map over list of strings
                      κ         Current index
                     ⊕          Incremented
                       ³        Literal 3
                    ﹪           Modulo
                        ι       Current value
                          ()    Literal string `()`
                            ι   Current value
                         ⪫      Join i.e wrap value in `()`
                   ⎇            Ternary
                                Literal space
⪫                               Join list
                                Implicitly print

Neil
quelle

3

J , 54 53 Bytes

1 Byte weniger dank @Jonah

(*stdout(3|.0=4 3 1 3 4&|,1=":)#3|.']) ([',":)@>i.100

Probieren Sie es online!

FrownyFrog
quelle

Danke, dass du das gemacht hast. Und warum musst du das stdouthier tun ? Das habe ich noch nie gesehen. @ FrownyFrog

Jonah

@Jonah Ich kann es nicht als vollständige Zeichenfolge ausgeben, es wird abgeschnitten (...) Stdout macht das nicht und es wird auch keine neue Zeile gedruckt, daher kann ich auch jede Zahl einzeln drucken. Aus irgendeinem Grund erscheinen nachgestellte Leerzeichen (es gibt 4, und nur 1 ist absichtlich da)

FrownyFrog

Dieser Ansatz ist wirklich clever, sowohl was die Rotation als auch die Wahl betrifft #. Ich hatte ein Hilfsverb umgebend mit eingeführt ()und []: g=. {.@[ , ":@] , {:@[. ugh die Ausführlichkeit!

Jonah

noch eine frage: irgendeinen grund, den du LFanstelle von benutzt hast _. Letzteres scheint auch zu funktionieren.

Jonah

3

C, C ++, 136 133 131 129 128 124 Bytes

-5 Bytes dank Zacharý und inspiriert durch write () - Funktion in D-Sprache (siehe Zacharý-Antwort)

-2 Bytes dank mriklojn

-12 Bytes für die C-Version dank mriklojn

-4 Bytes dank Ceilingcat

#include<cstdio>
void f(){for(int i=0;i++<99;)printf("(%s%d%s%s%s"+!!(i%3),i%4?"":"[",i,i%4?"":"]",i%3?"":")",i%99?" ":"");}

C Spezifische Optimierung: 115 Bytes

#include<stdio.h>
i;f(){for(;i++<99;)printf("(%s%d%s%s%s"+!!(i%3),i%4?"":"[",i,i%4?"":"]",i%3?"":")",i%99?" ":"");}

HatsuPointerKun
quelle

Lässt MSVC Sie das inf f()Ding machen? Entschuldigen Sie das Löschen meiner Kommentare, ich dachte, ich hätte etwas

Kürzeres

@ Zacharý Nein, ich denke, die Funktion ist zu einfach und erzeugt ein "f muss ein int zurückgeben". Übrigens war Ihre Lösung 3 Bytes kürzer (einschließlich Komprimierung gepaart mit dem Verschieben der Inkrementierung von i)

HatsuPointerKun

1

Verdammt, völlig vergessen printfwar eine Sache. Könnten Sie das C stdio dann nicht benutzen?

Zacharý

2

Eine andere Sache, die Sie verwenden / ausnutzen könnten, ist die Tatsache, dass Sie, zumindest mit gcc 5.3.1, das # include nicht benötigen und den Rückgabetyp der Funktion auch entfernen können. Wenn Sie int idie Funktion als außerhalb deklarieren (im globalen Bereich), ist ihr Wert standardmäßig 0 und ihr Datentyp standardmäßig 0 int. Dies würde dazu führen, dass Ihre Schleife bei 0 beginnt. i;f(){for(;++i<=99;)

Um dies zu korrigieren,

1

Schlagen Sie ")\0"+i%3statt i%3?"":")". Außerdem denke ich, dass Sie i=0am Anfang der Schleife hinzufügen müssen .

Ceilingcat

3

Powershell, 60 Bytes

"$(1..99|%{($_,"($_)","[$_]","([$_])")[!($_%3)+2*!($_%4)]})"

Erläuterung:

das Array mit 4 Elementen: $_, "($_)", "[$_]", "([$_])"
und der Index: [!($_%3)+2*!($_%4)]
Wiederholen Sie dies für jede Nummer
konvertiere das Ergebnis in einen String

Weniger Golf-Testskript:

$f = {

$r = 1..99|%{
    ($_, "($_)", "[$_]", "([$_])") [!($_%3)+2*!($_%4)]
}
"$($r)"

}

$expected = '1 2 (3) [4] 5 (6) 7 [8] (9) 10 11 ([12]) 13 14 (15) [16] 17 (18) 19 [20] (21) 22 23 ([24]) 25 26 (27) [28] 29 (30) 31 [32] (33) 34 35 ([36]) 37 38 (39) [40] 41 (42) 43 [44] (45) 46 47 ([48]) 49 50 (51) [52] 53 (54) 55 [56] (57) 58 59 ([60]) 61 62 (63) [64] 65 (66) 67 [68] (69) 70 71 ([72]) 73 74 (75) [76] 77 (78) 79 [80] (81) 82 83 ([84]) 85 86 (87) [88] 89 (90) 91 [92] (93) 94 95 ([96]) 97 98 (99)'
$result = &$f
$result-eq$expected
$result

Ausgabe:

True
1 2 (3) [4] 5 (6) 7 [8] (9) 10 11 ([12]) 13 14 (15) [16] 17 (18) 19 [20] (21) 22 23 ([24]) 25 26 (27) [28] 29 (30) 31 [32] (33) 34 35 ([36]) 37 38 (39) [40] 41 (42) 43 [44] (45) 46 47 ([48]) 49 50 (51) [52] 53 (54) 55 [56] (57) 58 59 ([60]) 61 62 (63) [64] 65 (66) 67 [68] (69) 70 71 ([72]) 73 74 (75) [76] 77 (78) 79 [80] (81) 82 83 ([84]) 85 86 (87) [88] 89 (90) 91 [92] (93) 94 95 ([96]) 97 98 (99)

mazzy
quelle

3

MathGolf , 41 40 34 29 Bytes

♀({îû)(î+╫îa_'(\')ßyΓî34α÷ä§

HINWEIS: Es ist ein Leerzeichen vorhanden

Nur meine zweite MathGolf Antwort ..
-5 Bytes dank @JoKing .

Probieren Sie es online aus.

Erläuterung:

♀(             # Push 99 (100 decreased by 1)
  {            # Start a loop, which implicitly loops down to (and excluding) 0
   û)(         #  Push string ")("
      î+       #  Append the 1-indexed index
        ╫      #  Rotate the string once towards the right
   îa          #  Push the 1-indexed index of the loop, wrap in a list
   _           #  Duplicate it
    '(        '#  Push string "("
      \        #  Swap the top two items of the stack
       ')     '#  Push string ")"
         ßy    #  Wrap all three into a list, and join them
   Γ           #  Wrap all four into a list
               #  (We now have a list [N, "(N)", "[N]", "([N])"], where N is the index)
   î           #  Push the 1-indexed index of the loop
    34         #  Push 3 and 4 to the stack
      α        #  Wrap all three into a list
       ÷       #  Check for each if the index is divisible by it
               #  (resulting in either [0,0], [0,1], [1,0], or [1,1]
        ä      #  Convert from binary to integer
               #  (resulting in either 0, 1, 2, or 3
         §     #  Push the string at that index from the array
               #  Push a space
               # (After the loop, output the entire stack joined together implicitly)

Kevin Cruijssen
quelle

@JoKing Danke! Wusste nicht, dass das qweggelassen werden kann und es wird implizit in Schleifen ausgeführt. Wusste auch nicht, dass eine 2/3/4 Saite eingebaut ist. Schade, dass der Drehtrick mit dem umschlossenen Array nicht funktioniert.

Kevin Cruijssen

Nun, es ist mehr so, dass ich die explizite Ausgabe jeder Iteration gegen implizite Ausgabe am Ende des Programms eingetauscht habe

Jo King,

@JoKing Ja, aber ich wusste nicht, dass es den gesamten zusammengefügten Stapel ausgeben würde, anstatt nur den oberen. :)

Kevin Cruijssen

Meine Lösung näherte sich 40 Bytes, obwohl ich falsch verstanden habe und dachte, dass geschweifte Klammern anstelle von eckigen Klammern verwendet werden sollten. Gute Arbeit an der Lösung!

Maximal

2

Haskell , 77 Bytes

unwords[f"()"3$f"[]"4$show n|n<-[1..99],let f(x:r)m s|mod n m<1=x:s++r|1<3=s]

Probieren Sie es online!

Ich frage mich, ob show[n]man es nutzen kann, um Dinge zu verkürzen, bis jetzt ohne Erfolg .

Laikoni
quelle

2

Lua, 161 123 Bytes

b=""for i=1,99 do;c,d=i%3==0,i%4==0;b=b..(c and"("or"")..(d and"["or"")..i..(d and"]"or"")..(c and")"or"").." "end;print(b)

Probieren Sie es online!

Ungolfed:

b = ""
for i = 1, 99 do
    c = 1 % 3 == 0
    d = 1 % 4 == 0
    a = ""
    if c then
        a = a .. "("
    end
    if d then
        a = a .. "["
    end
    a = a .. i
    if d then
        a = a .. "]"
    end
    if c then
        a = a .. ")"
    end
    b = b .. a .. " "
end
print(b)

David Wheatley
quelle

2

Python 2 , 105 97 88 86 85 84 Bytes

x=1
while x<100:print((('%s','(%s)')[x%3<1],'[%s]')[x%4<1],'([%s])')[x%12<1]%x,;x+=1

Probieren Sie es online!

ElPedro
quelle

2

C (gcc) 84 Bytes

main(i){while(99/i++)printf("%s%s%d%s%s ","("+i%3,"["+i%4,i-1,"]"+i%4,")"+i%3);}

Am Anfang jeder "Klammerzeichenfolge" steht ein Nullbyte.

Probieren Sie es online!

Dennis
quelle

Und in "(" + i% 3, woher weißt du, dass die Adresse für i = 2 auf einen

Zeichenwert von

Es funktioniert mit gcc, was gut genug ist, da PPCG Sprachen durch ihre Implementierungen definiert.

Dennis

Ich denke, man kann nicht sagen, dass der Code in jeder Implementierung des GCC-Compilers in

Ordnung

@RosLuP gcc funktioniert auf den meisten Computern jedoch auf die gleiche Weise, zumindest auf allen Computern mit der gleichen Architektur

ASCII

@ ASCII-nur möglich, wenn für Speicherplatz oder Geschwindigkeit optimiert kompiliert das Ergebnis ist anders ... Ich weiß nicht, ob es aus dem Standard ist ...

RosLuP

2

PowerShell , 67 62 Bytes

"$(1..99|%{'('*!($x=$_%3)+'['*!($y=$_%4)+$_+']'*!$y+')'*!$x})"

Probieren Sie es online!

Grundsätzlich ein FizzBuzz mit String-Multiplikationszeiten Boolescher Variablen (implizit auf 1 oder 0 umgewandelt). Diese Zeichenfolgen verbleiben in der Pipeline und werden in Anführungszeichen in einem Skriptblock zusammengefasst. Da die Standardeinstellung $OutputFieldSeparatorfür ein Array Leerzeichen ist, erhalten wir implizit durch Leerzeichen getrennte Array-Elemente.

AdmBorkBork
quelle

2

C #, 124 117 123 Bytes

-5 Bytes dank Kevin Cruijssen

x=>{for(int i=0;i++<99;)System.Console.Write((i%3<1?"(":"")+(i%4<1?"[":"")+i+(i%4<1?"]":"")+(i%3<1?")":"")+(i>98?"":" "));}

Testen Sie mit:

Action<int> t = x=>{for(int i=0;i++<99;)System.Console.Write((i%3<1?"(":"")+(i%4<1?"[":"")+i+(i%4<1?"]":"")+(i%3<1?")":"")+(i>98?"":" "));}
t.Invoke(0);
Console.ReadKey();

HatsuPointerKun
quelle

In den Vorstoß von C #, verstehe ich. Lässt C # Ganzzahlen als linkes Argument für einen ternären Operator zu, oder muss es ein Boolescher Wert sein?

Zacharý

Ich weiß nicht viel über C #, aber könnten Sie xstattdessen verwenden i, um sich keine Sorgen über das zu machen int ? (Sie müssten es natürlich noch einstellen).

Zacharý

@ Zacharý Nein, es wird ein CS0029-Fehler generiert "Kann nicht implizit int in boolean konvertieren". Und ja, ich könnte iund die Tatsache, dass ich es bei 0 initialisieren kann, wenn ich Invoke. Aber würde das nicht bedeuten, dass ich die Deklaration von t ( Action<int>) und den Aufruf ( t.Invoke(0)) in das bytecount aufnehmen müsste?

HatsuPointerKun

Ich frage, ob so etwas x=>{for(x=0;x++<99;)Console.Write((x%3==0?"(":"")+(x%4==0?"[":"")+x+(x%4==0?"]":"")+(x%3==0?")":"")+(x%99==0?"":" "));};funktionieren würde.

Zacharý

1

Alle fünf ==0können sein <1.

Kevin Cruijssen

2

Rot , 99 bis 97 Bytes

repeat n 99[a: b: c: d:""if n% 3 = 0[a:"("c:")"]if n% 4 = 0[b:"["d:"]"]prin rejoin[a b n d c" "]]

Probieren Sie es online!

Galen Ivanov
quelle

2

Ruby , 72 66 Bytes

p [*1..99].map{|x|a=x
a="[#{x}]"if x%4<1
a="(#{a})"if x%3<1
a}*' '

Danke an @ jonathan-frech und @ conor-obrien für den zusätzlichen Zuschnitt.

Wird überqueren
quelle

Hallo und willkommen bei PPCG! 70 Bytes .

Jonathan Frech

Willkommen bei PPCG! Hier ist ein weiteres 4 Bytes aus der @JonathanFrench ‚s Vorschlag, für 66 Bytes , da a.join bfür eine Reihe aund Zeichenfolge bentsprichta*b

Conor O'Brien

2

PowerShell, 98 82 74 67 63 62 Byte

Satte -31 Bytes dank @Veskah -5 Bytes dank @ ASCII-only

(1..99|%{(($a=($_,"[$_]")[!($_%4)]),"($a)")[!($_%3)]})-join' '

Probieren Sie es online!

Ich bin mir immer noch nicht ganz sicher, was ich hier gemacht habe.

Gabriel Mills
quelle

Nur ein bisschen schnelles Golfen für 70 Bytes . Sie müssen $ a nicht als Zeichenfolge verwenden und "$a"ersetzen den Wert trotzdem. (Hinweis: Einfache Anführungszeichen ersetzen nicht $foo, nur doppelte Anführungszeichen). Ein weiterer Trick ist, wenn es nur um 0 oder 1 geht, sodass Sie mit Boolescher Logik ein Byte speichern können

Veskah,

67 Bytes, wenn Sie auch die Listenindizierung verwenden.

Veskah

auch 67

ASCII

63?

Nur ASCII

62?

Nur ASCII

1

Perl -E, 60 Bytes

$,=$";say map$_%12?$_%3?$_%4?$_:"[$_]":"($_)":"([$_])",1..99

Einige Bytes können gespeichert werden, wenn wir Zeilenumbrüche zwischen den Zahlen verwenden können. In diesem Fall können wir das entfernen $,=$";, das mapin eine forSchleife umwandeln und das sayin die Schleife verschieben.

quelle

1

Bist du die Abigail? Erfinder von /^1$|^(11+?)\1+$/?

msh210

1

Wow. Was für eine Ehre, Sie hier zu haben!

msh210

1

Perl 6 , 51 48 Bytes

put {$_%3??$^a!!"($a)"}(++$_%4??$_!!"[$_]")xx 99

Probieren Sie es online!

nwellnhof
quelle

Ich würde den Unterschied zwischen Listen und Array - Darstellungen missbrauchen, wie diesem , aber ich bin nicht sicher , wie um die ganze Liste loszuwerden, die umschließenden Klammern zu bekommen ...

Jo König

@JoKing Ich habe auch darüber nachgedacht, aber ich habe nur diesen 51-Byter erfunden .

Nwellnhof

1

Batch, 145 Bytes

@set s=
@for /l %%i in (1,1,99)do @set/an=%%i,b=n%%4,p=n%%3&call:c
@echo%s%
:c
@if %b%==0 set n=[%n%]
@if %p%==0 set n=(%n%)
@set s=%s% %n%

Der Code fällt in die Unterroutine, aber die Zeichenfolge wurde zu diesem Zeitpunkt bereits gedruckt, sodass der Code harmlos ausgeführt wird.

Neil
quelle

1

PHP 103

for(;$i<1e2;$i++)$a.=$i%12==0?"([$i]) ":($i%3==0?"($i) ":($i%4==0?"[$i] ":"$i "));echo substr($a,5,-1);

https://www.ideone.com/SBAuWp

th3pirat3
quelle

1

Sauber , 100 Bytes

import StdEnv,Text

join" "[if(n/3*3<n)m("("+m+")")\\n<-[1..99],m<-[if(n/4*4<n)(""<+n)("["<+n<+"]")]]

Probieren Sie es online!

Οurous
quelle

1

sfk , 225 bytes

for n from 1 to 99 +calc -var #(n)/3+1/3 -dig=0 +calc -var #text*3-#(n) +setvar t +calc -var #(n)/4 -dig=0 +calc -var #text*4-#(n) +xed -var _0_#(t)\[#(n)\]_ _*_#(t)#(n)_ +xed _0*_([part2])_ _?*_[part2]_ +xed "_\n_ _" +endfor

Probieren Sie es online!

Οurous
quelle

1

Bash, 61 Bytes

-14 Bytes, danke an Dennis

seq 99|awk '{ORS=" ";x=$1%4?$1:"["$1"]";print$1%3?x:"("x")"}'

Erläuterung

Ziemlich einfach:

seq produziert 1..99
wir leiten das awkmit dem Output Record Separator (ORS ) ein, der auf Leerzeichen gesetzt ist, so dass die Ausgabe eine einzelne Zeile ist.
Der Hauptkörper von awk fügt nur "[]" hinzu, wenn die Zahl durch 4 teilbar ist, und fügt dann zusätzlich "()" hinzu, wenn die Zahl durch 3 teilbar ist.

Probieren Sie es online!

Jona
quelle

1

JavaScript (Node.js) , 57 Byte

f=(n=99)=>n&&f(n-1)+(s=n%4?n:`[${n}]`,n%3?s:`(${s})`)+' '

Probieren Sie es online!

Wurde in Community geändert, da die Optimierung zu stark davon abhängt

l4m2
quelle

Sie könnten sich dadurch deutlich verkürzen${n%4?n:`[${n}]`}

ETHproductions

66 Bytes (mit Vorschlag der ETH)

Alion

59 Bytes

Arnauld

57 Bytes

Neil

1

PHP, 65 Bytes

while($i++<99)echo$i%4?$i%3?$i:"($i)":($i%3?"[$i]":"([$i])")," ";

oder

while($i++<99)echo"("[$i%3],"["[$i%4],$i,"]"[$i%4],")"[$i%3]," ";

(benötigt PHP 5.5 oder neuer)

Laufen Sie mit -nroder versuchen Sie es online .

Titus
quelle

1

Python 2 , 78 Bytes

i=0
exec"i+=1;u=i%3/-2*(i%4/-3-1);print'([%0d])'[u:7-u:1+(i%3<1<=i%4)]%i,;"*99

Probieren Sie es online!

Ich habe mir diesen coolen Ansatz vorgestellt, '([%0d])'aber ich kann die Ausdrücke nicht kürzer fassen.

Lynn
quelle

1

Java 8, 92 91 Bytes

-1 Byte danke an @Dana

i->{for(;i++<99;)out.printf((i>1?" ":"")+(i%12<1?"([%d])":i%3<1?"(%d)":i%4<1?"[%d]":i),i);}

Probieren Sie es online!

Alternative Lösung, 82 Byte (mit nachfolgendem Speicherplatz in der Ausgabe - nicht sicher, ob dies zulässig ist):

i->{for(;i++<99;)out.printf((i%12<1?"([%d])":i%3<1?"(%d)":i%4<1?"[%d]":i)+" ",i);}

Erläuterung:

for(;i++<99;) - eine for-Schleife, die vom Wert von geht i (in diesem Fall 0) bis 99 reicht

out.printf(<part1>+<part2>,i); - formatiert den String, bevor er sofort mit dem Wert von stdout gedruckt wird i

wo <part1>ist (i>1?" ":"")- druckt das Leerzeichen aus, bevor die Nummer gedruckt wird, sofern nicht , diese Zahl ist 1. In diesem Fall wird das Leerzeichen weggelassen

und <part2>ist (i%12<1?"([%d])":i%3<1?"(%d)":i%4<1?"[%d]":i)- wenn idurch 3 und 4 teilbar ist, isind eckige und runde Klammern um ihn herum; sonst wenn idurch 3 teilbar, ihat runde Klammern; sonst wenn idurch 4 teilbar, ihat eckige Klammern; sonst ihat keine Klammern.

NotBaal
quelle

Speichern Sie ein Byte, indem Sie das Leerzeichen an den Anfang jeder Schleifeniteration verschieben(i>1:" ":"")

Dana,

Das würde nur funktionieren, wenn ich das Ergebnis in umgekehrter Reihenfolge ausdrucken würde (siehe dies ), aber tatsächlich 2 Bytes anstelle von 1

einsparen

Leider stimmt das nicht mit der erwarteten Ausgabe gemäß Frage überein, aber trotzdem vielen Dank für den Vorschlag!

NotBaal

1

Die "online testen" Links scheinen defekt zu sein. Ich habe nachgedacht i->{for(;i++<99;)out.printf((i>1?" ":"")+(i%12<1?"([%d])":i%3<1?"(%d)":i%4<1?"[%d]":i),i);}?

Dana

1

Ohhhh du hast recht, das funktioniert! Dank dafür!

NotBaal

Multiplizitätstest

Antworten:

05AB1E , 23 Bytes

Python 2 , 68 65 60 Bytes

R , 61 Bytes

Jelly , 21 bis 20 Bytes

Wie es funktioniert

D , 110 Bytes

Kohle , 30 Bytes

J , 54 53 Bytes

C, C ++, 136 133 131 129 128 124 Bytes

C Spezifische Optimierung: 115 Bytes

Powershell, 60 Bytes

MathGolf , 41 40 34 29 Bytes

Haskell , 77 Bytes

Lua, 161 123 Bytes

Python 2 , 105 97 88 86 85 84 Bytes

C (gcc) 84 Bytes

PowerShell , 67 62 Bytes

C #, 124 117 123 Bytes

Rot , 99 bis 97 Bytes

Ruby , 72 66 Bytes

PowerShell, 98 82 74 67 63 62 Byte

Perl -E, 60 Bytes

Perl 6 , 51 48 Bytes

Batch, 145 Bytes

PHP 103

Sauber , 100 Bytes

sfk , 225 bytes

Bash, 61 Bytes

Erläuterung

JavaScript (Node.js) , 57 Byte

PHP, 65 Bytes

Python 2 , 78 Bytes

Java 8, 92 91 Bytes