Beschreibung
Geben Sie das Reimschema für eine sehr lange Terza Rima aus.
Eingang
Keiner.
Ausgabe
ABA
BCB
CDC
DED
EFE
FGF
GHG
HIH
IJI
JKJ
KLK
LML
MNM
NON
OPO
PQP
QRQ
RSR
STS
TUT
UVU
VWV
WXW
XYX
YZY
Regeln
Sie können zwischen Zeilengruppen mit Leerzeichen oder Zeilenumbrüchen wählen, also entweder:
ABA BCB...
ODER
ABA
BCB
...
Ein einzelnes abschließendes Leerzeichen pro Zeile und eine abschließende neue Zeile sind zulässig.
Die Ausgabe kann entweder in Groß- oder Kleinbuchstaben erfolgen.
Das ist Code-Golf , also gewinnt der kürzeste Code in Bytes für jede Sprache.
code-golf
string
kolmogorov-complexity
alphabet
LiefdeWen
quelle
quelle
Antworten:
JavaScript (ES6),
515049 Bytes1 Byte dank @ l4m2 eingespart
Probieren Sie es online!
Wie?
Wir beginnen mit n = 45358 ( yzy in Basis 36). Wir subtrahieren 1333 von n bei jeder Iteration ( 111 in Basis 36). Wir stoppen, sobald n MOD 63 = 0 ist , da 12033 ( 9a9 in Basis 36) der erste Wert ist, für den diese Bedingung erfüllt ist, und 63 das kleinste Modulo mit einer solchen Eigenschaft ist.
quelle
C (gcc) , 41 Bytes
Probieren Sie es online!
Behoben und -9 dank user202729 . -1 dank Dennis und -2 dank Arnauld auch.
quelle
(i='ABA';i<'ZZZ';i+=65793)
Speichert ein Byte.59e5
statt'ZZZ'
speichert ein anderes Byte.i%29
für 41 Bytes verwendenGelee , 7 Bytes
Probieren Sie es online!
-1 Byte dank Dennis
quelle
Brainfuck ,
5148 Bytes3 Bytes dank @ovs gespart.
Probieren Sie es online!
Erläuterung
quelle
05AB1E , 5 Bytes
Probieren Sie es online!
-1 Byte dank Emigna
-1 Byte dank Regeländerung; danke an kalsowerus für den hinweis
Hehe, derzeit schlägt Pyth. \O/
Erläuterung
quelle
Aü«€û»
Brainfuck ,
5149 BytesProbieren Sie es online!
Ein Erklärungsversuch ...
-2 mit Dank an @ovs
Mein erster Versuch, also irgendwelche Hinweise zu brainficken, wurde dankbar aufgenommen. Wenn ich mehr Erfahrung damit hätte, könnte ich sicher noch ein paar Bytes mehr sparen, aber ich bin erst gestern darauf gekommen.
quelle
APL (Dyalog) , 14 Bytes
Probieren Sie es online!
Bitte beachten Sie, dass dies hinzugefügt
⎕←
wird, damit TIO den Text ausgibt und normalerweise nicht erforderlich ist.quelle
Python 2 ,
4241 Bytes-1 Byte danke an Halvard Hummel
Probieren Sie es online!
quelle
Holzkohle , 11 Bytes
Probieren Sie es online! Link ist eine ausführliche Version des Codes. Erläuterung:
quelle
Brain-Flak , 90 Bytes
Probieren Sie es online!
Dies ist unter anderem deshalb kürzer als die andere Brain-Flak-Antwort, weil statt Kleinbuchstaben Großbuchstaben verwendet werden, die kleinere ASCII-Werte aufweisen und daher einfacher zu übertragen sind.
Erläuterung:
quelle
R,
5147 BytesAusgabe:
quelle
sprintf
ist 49 Bytessprintf
richtig verwendet :)Java 8 ,
132856260 BytesGolf gespielt
Ungolfed
quelle
i
eine machenchar
?a->{for(char c=64;++c<90;)System.out.println(""+c++ +c--+c);}
(62 bytes)v->{...}
. Fügen Sie daher das oben von @ OlivierGrégoire erwähnte hinzu. ( Für den Fall, dass Sie nicht wissen, wie Java 8-Lambdas funktionieren, habe ich bereits eine Erklärung abgegeben. ) Außerdem können Sie die Klammern der Schleife entfernen, wie dies Olivier getan hat, und als zusätzliches Golfspiel können Sie den Ausdruck inSystem.out.print(" "+i+++i--+i);
(ein Leerzeichen) ändern von einer neuen Zeile, und Sie brauchen nicht das Leerzeichen anc+++c--+c
). Probieren Sie es hier aus.> <> ,
25242322 Bytes2 Bytes gespart dank Jo King
Probieren Sie es online!
quelle
Befunge-98 (FBBI) ,
272321 Bytes-4 Bytes dank James Holderness
Probieren Sie es online!
quelle
Schale , 9 Bytes
Probieren Sie es online!
quelle
Brainfuck , 41 Bytes
Probieren Sie es online!
quelle
Brainfuck ,
4537 BytesProbieren Sie es online!
Druckt in Großbuchstaben, die durch Leerzeichen mit einem Leerzeichen am Ende getrennt sind.
Wie es funktioniert:
quelle
Pyth , 7 Bytes
Probieren Sie es hier aus!
Hehe, derzeit schlägt Jelly. \O/Einfach in das folgende 05ab1e-Programm zu übersetzen:
05AB1E , 7 Bytes
Probieren Sie es online!
quelle
J , 15 Bytes
Probieren Sie es online!
quelle
Haskell ,
343231 BytesBasierend auf der Antwort von totalhuman . -1 Byte dank H.PWiz
Probieren Sie es online!
quelle
do
Brain-Flak , 180 Bytes
Probieren Sie es online!
Vielen Dank an DJ, der dafür gesorgt hat, dass es funktioniert
quelle
Haskell , 28 Bytes
Probieren Sie es online!
succ
ist so eine unglückliche Namenswahl ...Erläuterung
quelle
unlines
oder behoben werdenunwords
.R , 40 Bytes
Probieren Sie es online!
Eine weitere Alternative in R zu den Antworten von Plannapus und Giuseppe . Gepostet nach deren Anfrage. Diese Lösung verwendet ASCII-Code zur UTF8-Codierung.
PS: Wenn Tabulatoren zulässig wären, könnte die neue Zeile (ASCII-Code 10) durch eine Tabelle (ASCII-Code 9) ersetzt werden, und die Lösung könnte auf 39 Byte verkleinert werden:
cat(intToUtf8(rbind(x<-65:89,x+1,x,9)))
quelle
9
ist vollkommen in Ordnung, da es sich um Leerzeichen handelt, die vom OP zugelassen werden.R ,
4036 BytesProbieren Sie es online!
Eine Alternative zur Antwort von Plannapus ; dies stellt sich als etwas golferisch heraus; Ich habe es gemäß seiner Anfrage gepostet.
Siehe auch diese 40-Byte-Antwort von NofP, die ganz nett ist.
quelle
PowerShell ,
3937 BytesProbieren Sie es online!
Schleifen von
65
bis89
. Bei jeder Iteration erstellen wir ein ganzzahliges Array (das aktuelle, ein weiteres und das aktuelle) der aktuellen Ziffer unter Verwendung von Vorinkrementierung und Vordekrementierung. Das wird dann alschar
-array neu umgewandelt und-join
zu einer einzigen Zeichenfolge zusammengefasst. Jeder StringWrite-Output
verbleibt in der Pipeline, und eine implizite Angabe bei Programmabschluss gibt uns einen kostenlosen Zeilenumbruch zwischen den einzelnen Elementen.Alternativ die gleiche Byteanzahl
Probieren Sie es online!
quelle
($_,($_+1),$_)
ist ein alternatives Tupel gleicher LängeJ ,
1816 BytesGeändert ,
a.{~
umu:
nach Conor O'Brien und FrownyFrog LösungenProbieren Sie es online!
quelle
u:(i.25)+/66-#:5
Befunge, 26 Bytes
Probieren Sie es online!
quelle
Pepe,
5956 Bytes-3 Bytes dank u_ndefined
Probieren Sie es online!
Erläuterung:
quelle
rEeEeeeeEe
durchRrEEEEE
spart 3 BytesRetina , 24 Bytes
Probieren Sie es online!
quelle
`...
. Diese nachgestellten Zeilenumbrüche loszuwerden ist allerdings sehr ärgerlich. Ich hoffe, das Drucken in Loops in Retina 1.0 etwas flexibler und praktischer zu gestalten.Brainfuck , 73 Bytes
Probieren Sie es online!
quelle