Sie sind Austragungsort der Olympischen Spiele und müssen aus diesem Anlass einen fantastischen Pool errichten, aber die Aufsichtsbehörden ändern häufig ihre Meinung zu den Abmessungen und benötigen einen schnellen Weg, um ihn mit der gewünschten Größe wieder aufzubauen!

Bei zwei Ganzzahlen Lund xbesteht Ihre Aufgabe darin, ein Schwimmbad mit Längen Lund xGassen zu bauen .

Wie ist ein Pool aufgebaut?

Es enthält ein inneres Quadrat, dessen horizontale Wände aus Laufeinanderfolgenden Strichen bestehen ( -) und dessen vertikale Wände aus 3x - 1Balken bestehen ( |). Zusätzlich +liegen 4 Schilder in jeder Ecke. Lassen Sie uns ein Beispiel haben ( L = 10, x = 2):
```
+ ---------- +
| |
| |
| |
| |
| |
+ ---------- +
```
Jede Spur hat eine Breite von 2 vertikalen Einheiten. Das innere Quadrat ist mit x-1Spurentrennern gefüllt , die aus Lhorizontal aufeinanderfolgenden :Symbolen bestehen. Nach dem Einsetzen der Spurentrenner sollte unser Pool folgendermaßen aussehen:
```
+ ---------- +
| |
| |
| :::::::::: |
| |
| |
+ ---------- +
```
Ein Pool enthält auch eine Polsterung (ein äußeres Quadrat), deren horizontale Wände (L + 4) -und deren vertikale Wände (3x + 1) sind |und die das innere Quadrat umgibt:
```
+ -------------- +
| + ---------- + |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| + ---------- + |
+ -------------- +
```

Und das ist unser olympisches ** Schwimmbad!

Technische Daten:

Für Design und Funktionalität Zwecke, werden Sie garantiert , dass 100 ≥ L ≥ 10und 15 ≥ x ≥ 2.
Die Ausgabe muss genau wie gezeigt sein. Die Ausgabe eines "vertikal erstellten" * Pools ist nicht zulässig.
Nachgestellte und führende Leerzeichen sind zulässig.
Sie können die Eingabe und Ausgabe über eine beliebige Standardmethode vornehmen .
Es gelten Standardlücken .

Beispiele / Testfälle:

L = 20, x = 3

+ ------------------------ +
| + -------------------- + |
| | | |
| | | |
| | :::::::::::::::::::: | |
| | | |
| | | |
| | :::::::::::::::::::: | |
| | | |
| | | |
| + -------------------- + |
+ ------------------------ +



L = 50, x = 5:

+ ------------------------------------------------- ----- +
| + ------------------------------------------------- - + |
| | | |
| | | |
| | :::::::::::::::::::::::::::::::::::::::::::::::::: : | |
| | | |
| | | |
| | :::::::::::::::::::::::::::::::::::::::::::::::::: : | |
| | | |
| | | |
| | :::::::::::::::::::::::::::::::::::::::::::::::::: : | |
| | | |
| | | |
| | :::::::::::::::::::::::::::::::::::::::::::::::::: : | |
| | | |
| | | |
| + ------------------------------------------------- - + |
+ ------------------------------------------------- ----- +


L = 10, x = 15

+ -------------- +
| + ---------- + |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| | :::::::::: | |
| | | |
| | | |
| + ---------- + |
+ -------------- +

Das ist Code-Golf , also gewinnt der kürzeste Code in Bytes !

_{* Das Wasser könnte abfließen, wenn es senkrecht gebaut wird: P}

_{** Ja, mir ist bewusst, dass die Zeichnung umso weniger wie ein Pool aussieht, je länger die Bahnen sind und je kürzer der Pool ist!}

code-golf string ascii-art

— Mr. Xcoder
quelle

Sandbox für diejenigen, die gelöschte Beiträge anzeigen können.

— Mr. Xcoder

Was soll passieren wenn x>=L??

— CraigR8806

@ CraigR8806 Derselbe Algorithmus. Nur mit mehr Bahnen als die Länge des Pools. Ich habe das Gefühl, dass Sie die Frage falsch verstanden haben ...

— Mr. Xcoder

Was ist mit dem Fall wo L=10und x=15? Würde es nicht mehr Gassen geben, als im Pool platziert werden könnten? Ich könnte die Absicht falsch

— verstehen

@ CraigR8806 Die Länge hat nichts mit den Fahrspuren zu tun! Sie können es selbst mit einer der vorhandenen Antworten

— testen

13

Holzkohle , 32 Bytes

ＮθＮη↓Ｅθ×η:  Ｂ⁺θ²⁺×³η¹↖←Ｂ⁺θ⁶⁺×³η³

Probieren Sie es online!

-4 danke an Neil .

AST:

Program
├Ｎ: Input Number
│└θ: Identifier θ
├Ｎ: Input Number
│└η: Identifier η
├Print
│├↓: Down
│└Ｅ: Map
│ ├θ: Identifier θ
│ └×: Product
│  ├η: Identifier η
│  └':  ': String ':  '
├Ｂ: Box
│├⁺: Sum
││├θ: Identifier θ
││└2: Number 2
│└⁺: Sum
│ ├×: Product
│ │├3: Number 3
│ │└η: Identifier η
│ └1: Number 1
├Move
│└↖: Up Left
├Move
│└←: Left
└Ｂ: Box
 ├⁺: Sum
 │├θ: Identifier θ
 │└6: Number 6
 └⁺: Sum
  ├×: Product
  │├3: Number 3
  │└η: Identifier η
  └3: Number 3

— Erik der Outgolfer
quelle

wow Holzkohle hat diese Herausforderung :)

— Downgoat

Du bist deinem Namen treu geblieben - du hast mich übervorteilt.

— Notjagan

2

Wie immer bitte um Erklärung.

— CalculatorFeline

@CalculatorFeline Ja, ich habe keine Zeit, all diese Erklärungen zu machen, während ich nach etwas zum Ausgolfen suche ... Sie können den AST auch mit dem -aBefehlszeilenargument überprüfen .

— Erik der Outgolfer

Warum wird der -aFehler

— ausgelöst?

12

Kohle , 40 39 37 Bytes

ＮθＮηＢ⁺θ⁶⁺×³η³↘→Ｂ⁺θ²⁺×³η¹→Ｆ⁻η¹«Ｍ³↓Ｐ×:θ

Probieren Sie es online!

Ich weiß, dass Neil bereits eine Antwort in etwa der gleichen Länge hat, aber ich bin etwas anders vorgegangen, also dachte ich mir, ich könnte auch meine posten.

Erläuterung

ＮθＮηＢ⁺θ⁶⁺×³η³↘→Ｂ⁺θ²⁺×³η¹→Ｆ⁻η¹«Ｍ³↓Ｐ×:θ
ＮθＮη                                         take the two inputs as numbers in θ and η
      Ｂ⁺θ⁶⁺×³η³                               draw a rectangle θ + 6 by 3η + 3
                                               (characters default to |, - and +)
                ↘→                             move the cursor down one and right two
                   Ｂ⁺θ²⁺×³η¹                  draw a rectangle θ + 2 by 3η + 1
                             Ｆ⁻η¹«            for ι (unused) from 0 up until η - 1:
                                   Ｍ³↓            move the cursor down by 3
                                       Ｐ×:θ       print θ :s without moving the cursor
                                               [implicit end of for]

— notjagan
quelle

1

Erklärung bitte.

— CalculatorFeline

@CalculatorFeline Hinzugefügt.

— Notjagan

1

Huh, also ist der dritte Parameter Ｂoptional? Schön, das spart mir zwei Bytes!

— Neil

11

Kohle, 40 38 36 31 Bytes

Ａ⁺²ＮθＡ⁺¹×³ＮηＵＯθη:¶¶Ｂθη↖←Ｂ⁺⁴θ⁺²η

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

Ａ⁺²Ｎθ       Assign(Plus(2, InputNumber()), q);

Die Zeichengrundelemente von Charcoal verwenden die Gesamtzahl der Zeichen einschließlich +s. Die Eingabe ist jedoch nur die Anzahl -s. Daher müssen wir 2 addieren, um die Breite der Innenwand zu erhalten.

Ａ⁺¹×³Ｎη     Assign(Plus(1, Times(3, InputNumber())), h);

Berechnen Sie erneut die Höhe der Innenwand einschließlich der untersten Reihe, also drei pro Spur plus eins.

ＵＯθη:¶¶     Oblong(q, h, ":\n\n");

Zeichne die Gassen. Dies ist einfach ein Rechteck, das :durch zwei Leerzeilen vertikal voneinander getrennt ist (die Pilger stehen für Zeilenumbrüche).

Ｂθη         Box(q, h);

Der RectangleBefehl ist genau das, was wir brauchen, um die Innenwand zu zeichnen. Bearbeiten: Mit dieser Option Boxkönnen Sie den dritten Parameter weglassen und mir 2 Bytes sparen.

↖           Move(:UpLeft);
←           Move(:Left);
Ｂ⁺⁴θ⁺²η     Box(Plus(4, q), Plus(2, h));

Und wieder, um die äußere Wand zu zeichnen, außer etwas breiter und höher und zentriert auf der inneren Wand.

— Neil
quelle

1

Warum sind die Links zu Charcoal-Code bei TIO niemals mit dem eigentlichen Code verknüpft?

— Jonathan Allan

1

@ JonathanAllan Ich verweise auf den ausführlichen Code, da dieser besser lesbar ist. Außerdem füge ich das Argument hinzu, um den kurzen Code automatisch zu Überprüfungszwecken zu generieren.

— Neil

... aber wie sind 219 Zeichen lesbarer als 40? : p

— Jonathan Allan

Ich hätte nur härter hinschauen und diesen Tipp beachten können :)

— Jonathan Allan

1

Wie immer bitte erklären.

— CalculatorFeline

8

T-SQL, 284 281 Bytes

DECLARE @ INT,@x INT,@S VARCHAR(MAX)='+--d--+b| +d+ |b'SELECT @=L,@x=x FROM t
P:SET @S+='| |s| |b| |s| |b| |c| |b'SET @x-=1IF @x>0GOTO P
PRINT REPLACE(REPLACE(REPLACE(REPLACE(LEFT(@S,LEN(@S)-6)+'+d+ |b+--d--+','d',REPLICATE('-',@)),'b',CHAR(13)),'s',SPACE(@)),'c',REPLICATE(':',@))

Eingang wird von INT Spalten entnommen L und x in vorbestehenden Tabelle t , pro unseren erlaubt Eingabemethoden .

Grundsätzlich erstelle ich eine lange Zeichenfolge mit Buchstaben, die die wiederholten Zeichen darstellen (d = Bindestriche, s = Leerzeichen, c = Doppelpunkte, b = Zeilenumbruch), und ersetze sie am Ende durch die entsprechenden Füllzeichen.

Formatiert:

DECLARE @ INT,@x INT,@S VARCHAR(MAX)='+--d--+b| +d+ |b'
SELECT @=L,@x=x FROM t
P:
    SET @S+='| |s| |b| |s| |b| |c| |b'
    SET @x-=1
IF @x>0 GOTO P
PRINT REPLACE(REPLACE(REPLACE(REPLACE( LEFT(@S,LEN(@S)-6)+'+d+ |b+--d--+'
     ,'d',REPLICATE('-',@))
     ,'b',CHAR(13))
     ,'s',SPACE(@))
     ,'c',REPLICATE(':',@))

Innerhalb der Schleife hänge ich 2 Reihen Leerzeichen und 1 Reihe Doppelpunkte an. Am Ende schneide ich diese Teilerreihe ab und hänge den Poolrand an, bevor ich die Ersetzungen vornehme.

BEARBEITEN : Speichert 3 Bytes durch Umschalten @auf die am häufigsten verwendete Variable und Vertauschen der Initialisierungsreihenfolge.

— BradC
quelle

8

JavaScript (ES6), 137 - 124 Byte

Ich habe es auf meinem Handy ein bisschen runtergespielt, weitere werden folgen.

x=>y=>`+--0--+
| +0+ |
${((a=`| |1| |
`)+a+`| |2| |
`).repeat(y-1)+a+a}| +0+ |
+--0--+`.replace(/\d/g,n=>"- :"[n].repeat(x))

Versuch es

f=
x=>y=>`+--0--+
| +0+ |
${((a=`| |1| |
`)+a+`| |2| |
`).repeat(y-1)+a+a}| +0+ |
+--0--+`.replace(/\d/g,n=>"- :"[n].repeat(x))
oninput=_=>o.innerText=f(+i.value)(+j.value);o.innerText=f(i.value=50)(j.value=5)

input{font-family:sans-serif;margin:0 5px 0 0;width:50px;}

<label for=i>L: </label><input id=i type=number><label for=j>x: </label><input id=j type=number><pre id=o>

Erweitern Sie das Snippet

— Zottelig
quelle

Ich mag dieses, weil es interaktiv ist: D

— xDaizu

@ xDaizu, checkt einige meiner anderen JS-Lösungen aus, also;)

— Shaggy

6

Python 2 , 124 120 117 Bytes

^{-2 Bytes dank Hyper Neutrino}

l,x=input()
o='+--%s--+\n| +%s+ |\n'%(('-'*l,)*2)
print o+'| |%s| |\n'*(x*3-1)%((' '*l,' '*l,':'*l)*x)[:-1]+o[-2::-1]

Probieren Sie es online!

— Stange
quelle

122 Bytes (Ihre Variable tist nicht

— erforderlich

4

SOGL V0.12 , 52 51 Bytes

:┌* +1Ο;@*┐1ΟG∙⁴++⁰
b3*Ie4+⁰b3*He⁰32žbH∫3*2+4;e :*ž

Probieren Sie es hier aus!
Nicht schlecht, wenn man bedenkt, dass 20 Bytes davon eine Rechteckfunktion sind, für die Holzkohle eine eingebaute Funktion hat.

Erläuterung:

Rectangle function: (example: on stack 4, 2)
:                   duplicate the top of stack (X pos)      [4, 2, 2]
 ┌*                 get that many "-"es                     [4, 2, "--"]
    +               push "+"                                [4, 2, "--", "+"]
     1Ο             wrap the dashes in pluses               [4, 2, "+--+"]
       ;            get the duplicated X position           [4, "+--+", 2]
        @*          get that many spaces                    [4, "+--+", "  "]
          ┐         push "|"                                [4, "+--+", "  ", "|"]
           1Ο       wrap the spaces with "|"                [4, "+--+", "|  |"]
             G      get the Y value ontop                   ["+--+", "|  |", 4]
              ∙     get an array with that many strings     ["+--+", ["|  |", "|  |", "|  |", "|  |"]]
               ⁴    duplicate the dashes wrapped in pluses  ["+--+", ["|  |", "|  |", "|  |", "|  |"], "+--+"]
                ++  add everything to one array             [["+--+", "|  |", "|  |", "|  |", "|  |", "+--+"]]
Main function: (example input: 2, 5)
b3*                              push variable B (input 1, Y length) multiplied by 3                     [6]
   I                             increase it                                                             [7]
    e4+                          push variable E (input 2, X length) + 4                                 [7, 9]
       ⁰                         execute the rectangle function [in X: E+4, Y: b*3+1]                    [["+---------+","|         |","|         |","|         |","|         |","|         |","|         |","|         |","+---------+"]]
        b3*                      push variable B * 3                                                     [["+---------+",..,"+---------+"], 6]
           H                     decrease it                                                             [["+---------+",..,"+---------+"], 5]
            e                    push variable E                                                         [["+---------+",..,"+---------+"], 5, 5]
             ⁰                   execute the rectangle function [on X: E, Y: B*3-1]                      [["+---------+",..,"+---------+"], ["+-----+","|     |","|     |","|     |","|     |","|     |","+-----+"]]
              32ž                at coordinates [3;2] (1-indexed) in the first rectangle put in the 2nd  [["+---------+",
                                                                                                           "| +-----+ |",
                                                                                                           "| |     | |",
                                                                                                           "| |     | |",
                                                                                                           "| |     | |",
                                                                                                           "| |     | |",
                                                                                                           "| |     | |",
                                                                                                           "| +-----+ |",
                                                                                                           "+---------+"]
                 bH∫             iterate over the numbers from 1 to B-1:                                 [[...], 1]
                    3*2+           push pop()*3+2                                                        [[...], 5]
                        4;         push 4 one below the stack                                            [[...], 4, 5]
                          e        push the variable E (X length)                                        [[...], 4, 5, 5]
                            :*     get that many colons                                                  [[...], 4, 5, ":::::"]
                              ž    insert [at coordinates [4; cIter*3+2] the colons]

— dzaima
quelle

4

C # (.NET Core) , 202 Byte

(L,x)=>{char p='+',n='\n',e=' ';string v="|",r="",s=p+new string('-',L+4)+p+n,q=v+e+p+new string('-',L)+p+e+v+n;r+=s+q;for(int i=0;i<3*x-1;)r+=v+e+v+new string(i++%3<2?e:':',L)+v+e+v+n;r+=q+s;return r;}

Probieren Sie es online!

— Charlie
quelle

4

Python 2 , 128 126 Bytes

L,x=input()
k='+'+'-'*(L+4)+'+\n| +'+'-'*L+'+ |\n'
f=lambda k:'| |'+k*L+'| |\n'
print k+f(':').join([f(' ')*2]*x)[:-1]+k[::-1]

Probieren Sie es online!

-2 Bytes dank @ Mr.Xcoder

— HyperNeutrino
quelle

126 Bytes

— Mr. Xcoder

@ Mr.Xcoder Richtig, danke, ich weiß nicht, was ich mit diesen zusätzlichen Klammern

— gedacht habe

3

PHP , 153 Bytes

for(;$i-2<$z=3*$argv[2]+1;$i++)echo str_pad(strrev($r=["--+","+ |","| |"][!($b=$i>1&$i<$z)?$i&&$i<$z+1?1:0:2]),$argv[1]+3,"- :"[$b?$i%3!=1?1:2:0])."$r
";

Probieren Sie es online!

— Jörg Hülsermann
quelle

3

Python 2 , 97 Bytes

L,x=input()
for i in'01'+'223'*~-x+'2210':r=('+|||-   -+||'+L*'-- :')[int(i)::4];print r+r[2::-1]

Probieren Sie es online!

Python 2 , 98 Bytes

L,x=input()
s='+---| +-%s+-+---'%'|:'.join(['| '*5]*x)
while s:print s[:3]+s[3]*L+s[2::-1];s=s[4:]

Probieren Sie es online!

— xnor
quelle

2

Kohle , 36 Bytes

ＮθＮηＦη«Ｍ³↑Ｐ×θ:»←Ｂ⁺θ²⁺×³η¹↖←Ｂ⁺θ⁶⁺×³η³

Probieren Sie es online!

Dies ist ein mehr Charcoal-y-Algorithmus als meine andere Antwort.

— Erik der Outgolfer
quelle

1

Holzkohle hat offiziell die ganze Herausforderung übernommen. 4/10 Antworten sind in Charcoal ...

— Mr. Xcoder

@ Mr.Xcoder Nun, es ist eine Sprache, die speziell für das Golfen von ASCII-Kunst entwickelt wurde. ;)

— Erik der Outgolfer

1

Erklärungsanfrage.

— CalculatorFeline

@ Mr.Xcoder Und drei von ihnen sind auch gleich lang!

— Neil

2

C (gcc) , 195 Bytes

#define P printf
y;f(L,l){char s[L+1],t[L+1];memset(s,45,L);memset(t,58,L);t[L]=s[L]=0;P("+-%s-+\n|+%s+|\n",s,s);for(y=3*l;y-->1;y%3?P("||%*c||\n",L,32):P("||%s||\n",t));P("|+%s+|\n+-%s-+",s,s);}

Probieren Sie es online!

— scottinet
quelle

1

Perl 5 , 124 + 1 (-a) = 125 Bytes

say$o='+'.'-'x($l=pop@F),$t="----+
",$i="| $o+ |
",$e=($d="| |").$"x$l.$d,$/,$e;say$d.':'x$l."$d
$e
$e"for 2..$_;say$i,$o,$t

Probieren Sie es online!

— Xcali
quelle

Sie sind der Gastgeber der Olympischen Spiele!

Wie ist ein Pool aufgebaut?

Technische Daten:

Beispiele / Testfälle:

Holzkohle , 32 Bytes

Kohle , 40 39 37 Bytes

Erläuterung

Kohle, 40 38 36 31 Bytes

T-SQL, 284 281 Bytes

JavaScript (ES6), 137 - 124 Byte

Versuch es

Python 2 , 124 120 117 Bytes

SOGL V0.12 , 52 51 Bytes

C # (.NET Core) , 202 Byte

Python 2 , 128 126 Bytes

PHP , 153 Bytes

Python 2 , 97 Bytes

Python 2 , 98 Bytes

Kohle , 36 Bytes

C (gcc) , 195 Bytes

Perl 5 , 124 + 1 (-a) = 125 Bytes