Erinnerst du dich an das Kinderspiel "Ente, Ente, Gans" ? Nein? Ich auch nicht.

Die Herausforderung

• Drucken Sie das Wort "Ente" unbestimmt oft in einzelne Zeilen.
• Drucken Sie das Wort "Gans".
• Ihr Programm endet.

Die Regeln

• Versuchen Sie, das Spiel in den wenigsten Bytes zu spielen.
• Es muss mindestens eine Ente sein.
• Am Ende der Liste muss genau eine Gans stehen.
• Es muss genau ein Vogel auf jeder Linie sein. Keine leeren Zeilen.
• Der Fall der ausgegebenen Zeichenfolgen ist irrelevant.
• Leerraum innerhalb einer Zeile ist in Ordnung.
• Ihr Programm muss beendet sein.
• Ihr Programm darf nicht immer die gleiche Anzahl von Enten produzieren.

Habe Spaß!

Bitte beachten Sie: Diese Frage ist kein Duplikat des kürzesten Codes, um eine nicht deterministische Ausgabe zu erhalten

Gründe sind:

• Die Assoziation zu einem Kinderspiel
• Die definierten Start- und Endanforderungen der Ergebniszeichenfolge. In der anderen Challenge ist keine Ausgabe angegeben.
• Antworten Die andere, nicht doppelte Abfrage besteht aus einer einstelligen Anzahl von Bytes. Der Durchschnitt für dieses ist ungefähr 30 oder dort ungefähr.
• In Anbetracht der Überlappung zwischen dieser und dieser Herausforderung ist jede Code-Golf-Frage, einschließlich des "zufälligen" Tags, ein Duplikat. Sollen wir sie alle löschen?
• Die Code-Antworten für diese Herausforderung stimmen auf lächerliche Weise mit der anderen Herausforderung überein, aber die Antworten auf diese Herausforderung stimmen nicht mit dieser überein.

Jelly , 13 Bytes

2X“¢;ÆS»ẋ“ʋ¢»

Probieren Sie es online!

Erläuterung:

2X“¢;ÆS»ẋ“ʋ¢»

2X             Random number (1 or 2)
  “¢;ÆS»       Compressed string equivalent to "duck\n"
        ẋ      Repeat the "duck\n" that random number of times
         “ʋ¢»  Compresses string equivalent to "goose"
               Implicitly concatenated and returned

Mehr lesbare Version: Probieren Sie es online!

Gibt immer 1 oder 2 Enten zurück.

Operation Flashpoint- Skriptsprache, 48 Byte

f={s="duck\n";s+([s,""]select random 1)+"goose"}

Druckt immer eine oder zwei Enten.

random 1Gibt eine (Gleitkomma-) Zahl zwischen 0 und 1 zurück. Diese Zahl wird als Argument selectzusammen mit dem Array übergeben [s,""]. Die Zufallszahl wird dann auf die nächste Ganzzahl (entweder 0 oder 1) gerundet, und das Array-Element an diesem Index wird aus dem Array ausgewählt.

Rufen Sie an mit:

hint call f

Ausgabe:

Alternative 56-Byte-Version:

f={s="duck\n";format[s+"%1goose",[s,""]select random 1]}

World of Warcraft 81 Bytes

Hier ist ein Makro, das Sie in World of Warcraft ausführen können.

/run for x=1,random(1,9) do SendChatMessage("Duck") end; SendChatMessage("Goose")

Minecraft <1,13, 72 54 Bytes

Entschuldigung, ich musste.

Anleitung:

• Erstelle eine neue Minecraft-Welt im Kreativmodus
• Suchen Sie den Speicherordner für diese Welt und geben Sie den folgenden Code ein data/functions/minecraft/ddg.mcfunction
• Führen Sie /function ddgin der Spielekonsole

Wie es funktioniert:

Gibt das Wort "Ente" für jede Entität auf der Welt aus und anschließend das Wort "Gans". Da Entitäten ständig laichen und entlaichen, ist die Anzahl der "Enten" nicht konsistent. Ich habe tellrawstattdessen das viel kürzere verwendet, sayweil es sayden Namen der Entität tellrawausgibt , während es genau das ausgibt, was ihm gesagt wird.

execute @e ~ ~ ~ tellraw @a "duck"
tellraw @a "goose"

Bildschirmfoto

Edit: {"text": "duck"} wurde in "duck" geändert (und das selbe mit "goose")

JavaScript, 45 44 42 39 37 Bytes

Kann einen Überlauffehler verursachen.

f=_=>`duck
${new Date%2?f():`goose`}`

Probier es aus

o.innerText=(
f=_=>`duck
${new Date%2?f():`goose`}`
)()

<pre id=o></pre>

Oktave , 38 33 Bytes

Dies ist nicht die kürzeste (es ist 36 Bytes), aber es ist mein Favorit. Die Erklärung ist unten.

disp(['duck '+~(1:1/rand)';'goose'])

Probieren Sie es online!

Einige kürzere Variationen:

Dies funktioniert im Prinzip (33 Bytes), aber die Online-Dolmetscher haben eine Zeitüberschreitung:

disp(['duck '+~(1:now)';'goose'])

Das Hinzufügen einiger Bytes, um die Ausgabe zu verkürzen, ergibt 35 oder 36 Bytes:

disp(['duck '+~(7e5:now)';'goose'])   % Works on octave-online.net
disp(['duck '+~(7.3e5:now)';'goose']) % Works on tio.run

Erläuterung:

Ich erkläre nur den letzten Zufall. Die anderen sind ähnlich, verwenden jedoch die Anzahl der Tage seit dem 1. Januar 0000 bis heute.

randGibt eine Zufallszahl für das Intervall (0, 1) zurück . Somit 1/randliefert eine Zahl größer als 1 . Da ein Bereich 1:f, in dem fein zufälliger Gleitkommawert größer als 1 ist, mit identisch ist 1:floor(f), 1:1/randwird ein Bereich 1 ... x erstellt , in dem x> = 1 ist .

Ich werde versuchen, dies so zu erklären, als ob Octave eine Stack-basierte Sprache wäre.

      'duck '                           % Push the string 'duck ' to the stack
               (1:1/rand)               % Push a vector 1... floor(1/rand)
              ~(1:1/rand)'              % Negate the vector (making it all zeros)
                                        % and transpose it.
             +                          % Add 'duck ' with the vertical vector of zeros
                                        % to implicitly duplicate the string r times
     [                    ;'goose']     % Push the string 'goose' and concatenate
                                        % vertically with the rest
disp(                              )    % Display it all.

Perl 5 , 20 Bytes

Zuerst praktische 26 Bytes:

Duckt sich 1 bis 9 Mal vor dem Gänsen.

say"Duck
"x(1+$^T%9),Goose

Probieren Sie es online!

Aber wenn Sie viel Speicher und Zeit haben, funktioniert diese 20-Byte-Version (wie von Chris vorgeschlagen ) auch:

say"Duck
"x$^T,Goose

Dies setzt auch voraus, dass das Jahr-2038-Problem für Perl 5 gelöst ist , andernfalls ist es in 20 Jahren für 1 Sekunde ungültig.

Python 2 , 36 34 Bytes

print"duck\n"*((id(id)%5)+1),"goose"

Probieren Sie es online!

Ein Vorschlag von Kevin Cruijssen bringt uns auf 34 Bytes:

print"duck\n"*-~(id(id)%5),"goose"

Z-Shell (+ wget & Netpbm), 168 160 150 148 145 135 120 Bytes

d(){wget -O- bit.ly/$1|jpegtopnm|pamscale -w 64 -h 64};d DckDkGo|pnmtile 64 $[(RANDOM&7+1)*64]|pnmcat -tb - <(d g005eGG)

Nicht die kürzeste Lösung, aber ich wollte dieser Herausforderung eine Art Wendung geben (inspiriert von @ AlexGs Lösung für dieses andere Problem ).

Dieses Skript generiert ein PPM-Bild mit 1-8 Bildern von Enten und einem Bild einer Gans unten in der Standardausgabe. Es lädt die beiden Quellbilder von Wikipedia herunter, sodass ein Internetzugang erforderlich ist, damit es funktioniert.

Beispielausgabe, die über pnmtojpeg in JPEG konvertiert wurde :

R , 35 Bytes

cat(rep("duck
",rexp(1)+1),"goose")

Probieren Sie es online!

rexp()erzeugt eine Zufallszahl aus einer exponentiellen Abklingfunktion. +1mindestens eine Ente zu gewährleisten. Alle Zeilen nach der ersten enthalten ein führendes Leerzeichen (das das Standardtrennzeichen für ist cat), dies ist jedoch zulässig.

Bash , 39 38 37 Bytes

sed s/[0-9]/duck\\n/g<<<$RANDOM\goose

Probieren Sie es online!

Gibt eine Anzahl von Enten aus, die der Anzahl von Ziffern in einer Ganzzahl entspricht, die gleichmäßig auf [0,32767] verteilt ist (also häufig fünf Enten (eine gute Anzahl von Enten)).

Jeweils -1 Byte dank @Chris und @sch, die auf Paare von Anführungszeichen hinweisen, die ihr Gewicht nicht belasteten.

Pure Bash (keine externen Dienstprogramme), 25

Basierend auf der Antwort von @ SophiaLechner druckt dies auch eine gute Anzahl von Enten .

@ OlivierDulacs Idee, die im $Parameter gespeicherte PID der Skript-Shell zu verwenden, spart 5 Byte.

echo "${$//?/duck
}"goose

Probieren Sie es online aus .

Ruby , 30 Bytes

puts"duck
"*rand(1..9)+"goose"

Probieren Sie es online!

Hinweis: Wirklich 31 Bytes ohne den \nCheat.

Bash + Coreutils, 36 27 Bytes

yes duck|sed $$q;echo goose

Druckt zu viele Enten (zwischen 2 und cat /proc/sys/kernel/pid_max), dann eine Gans.

Dank Digital Trauma und Olivier Dulac neun Bytes gespart.

Probieren Sie es online! (aber denken Sie daran, dass es gelegentlich abgeschnitten werden kann)

Gleiche Länge, aber ohne echo:

yes duck|sed $${agoose'
q}'

Probieren Sie es online!

aist der Befehl append in sedund wird qbeendet. Beide laufen nur auf der Leitung $$, die der PID entspricht.

PowerShell , 35 30 28 Bytes

,"duck"*((Random)+1)
"goose"

Probieren Sie es online! (modifizierte Version)

Erzeugt eine Get-RandomReihe von Elementen. Es könnte eine Weile dauern. Dies fügt eine hinzu, +1um sicherzustellen, dass wir mindestens eine erhalten duck. Die geänderte Version enthält auch ein -maximum-Flag von, 5damit Sie sehen können, dass das Programm wie erwartet funktioniert (die geänderte Version gibt 1, 2, 3 oder 4 ducks vor dem aus goose).

Das Array und die einzelne Zeichenfolge verbleiben goosein der Pipeline, und das Implizite Write-Outputgibt uns durch Zeilenumbrüche getrennte Werte frei.

Sie wissen nicht, wie schwierig es für mich war, die letzte Zeile nicht in "graue Ente" zu ändern ...

Python 2 , 54 Bytes

from random import*
print"duck\n"*randint(1,9)+"goose"

Probieren Sie es online!

C # (Visual C # Interactive Compiler) , 55 Byte

Write("{"+new Random().Next(2)+"}{0}goose","duck\n","")

Probieren Sie es online!

Brachylog , 24 21 Bytes

-3 Bytes dank Erik dem Outgolfer

"duck"ẉ4ṙ0∧"goose"w∨↰

Probieren Sie es online!

Zur Feier der Sprache des Monats mein erster Brachylog-Beitrag. Der Kontrollfluss in dieser Sprache ist cool.

Wie es funktioniert:

"duck"ẉ4ṙ0∧"goose"w∨↰
"duck"ẉ                 print duck with a new line
       4ṙ               choose a random number in the range is [0, 4]
         0              verify it equals zero
          ∧             and (short circuits)
           "goose"w     print goose without a newline
                   ∨    or (if it did not equal zero)
                    ↰   repeat the procedure

Geometry Dash World 2.2 Editor - 4 Objekte

Erläuterung:

Der BG-Trigger ist der zufällige Trigger des aktuellen 2.2, sodass entweder die Gruppen-ID 1 oder 2 umgeschaltet wird.

Die erste "ENTE" hat eine Gruppen-ID von 1, wodurch eine 50% ige Chance besteht, dass sie entfernt wird oder nicht (umgeschaltet).

In diesem Level gibt es kein Objekt mit der Gruppen-ID 2, daher besteht eine 50% ige Chance, dass 2 "ENTE" angezeigt werden.

So reproduzieren Sie dies:

Die erste "ENTE" hat eine Gruppen-ID von 1.

Gans und 2. Ente haben keine Gruppen-ID

Innerhalb des Zufallstriggers.

05AB1E , 15 14 Bytes

'Ðœ₁Ωи`.•zíΘ•»

Probieren Sie es online!

Druckt 2, 5 oder 6 Enten und dann Gans.

-1 Byte dank @Emigna mit 'für ein einzelnes komprimiertes Wort (duck)

APL (Dyalog) , 22 Bytes

1 Byte gespart dank @EriktheOutgolfer

'Goose'⍪⍨(?9)5⍴'Duck '

Probieren Sie es online!

Retina , 17 Bytes

?\\K`duck
K`goose

Probieren Sie es online!

Probieren Sie es online!

Druckt mit gleicher Wahrscheinlichkeit 1 oder 2 Enten.

Erläuterung

?\\K`duck

Setzen Sie die Arbeitszeichenfolge auf duckund drucken Sie sie mit einem nachfolgenden Zeilenumbruch ( \). Dann wird dies in eine andere Ausgangsstufe eingebunden, auf diese wird jedoch das Zufallsflag ( ?) angewendet, sodass nur mit einer Wahrscheinlichkeit von 50% gedruckt wird.

K`goose

Ersetzen Sie das duckmit goose, das implizit am Ende des Programms gedruckt wird.

Hier ist eine lustige Alternative, die 1 Ente mit 50% Wahrscheinlichkeit, 2 Enten mit 25%, 3 Enten mit 12,5% druckt ...:

\K`duck
?+\G`
K`goose

Vim (Skript) unter Linux, 46 43 Bytes (4946 mit :am Zeilenanfang)

.!date +0\%N\%s6
s/6.*/goose
s/\d/duck\r/g

Ausgeführt als vim -S filenameoder eingefügt in Laufen vimmit :vor jeder Zeile.

> <> , 31 22 Bytes

"duck"a>x
r"esoog"<>o<

Probieren Sie es online!

-9 Bytes basierend auf der Revision von Not a Tree

Befunge 98 , 38 30 25 Bytes

"esooG"v>:#,_@
"Duck"a<?<

Probieren Sie es online!

• Vielen Dank, @JoKing, dass du das nutzlose Trampolin ausgezogen hast
• Wechseln Sie zu Befunge 98 für kürzere neue Zeile - Duckpasst jetzt in eine einzelne Zeichenfolge

T-SQL , 70 44 43 Bytes (Viele Enten)

while rand()<.9print'duck'print'duck
goose'

Danke @Zac Faragher!

Überarbeitete Version, 54 43 40 Bytes (1 oder 2 Enten)

Vielen Dank @BradC!

if rand()<.5print'duck'print'duck
goose'

Ich kann nicht scheinen, dieses zu erhalten, um in SQL Fiddle richtig zu laufen , aber es funktioniert gerade fein in LINQPad und in SSMS.

Ich bin mir nicht sicher, ob dies eine bekannte Einschränkung von SQL Fiddle ist oder ob ich einfach etwas falsch mache

Powershell - 31 30 Bytes

Warnung : Sie werden höchstwahrscheinlich mit einer Menge Enten enden. RandomUmfasst die Werte von 0 bis Int32.MaxValue. Je nachdem, wie zufällig Ihre Zahl ist, kann dies eine Menge Quacksalber sein.

1..(Random)|%{"Duck"};"Goose"

Spaltung , 24 19 Bytes

R"duck"N#
"goose"*[

Probieren Sie es online!

-5 Bytes dank Martin Ender

Brachylog , 21 Bytes

1ṙ+₁;"Duck
"j₍,"Goose

Probieren Sie es online!

Hey, die Sprache des Monats wird inaktiv, lasst uns die Dinge ein wenig aufmuntern!

Befunge

57 35 Bytes (Umfang des gesamten Feldes ist 19x3 17x2 Zeichen) Vielen Dank an Karhell für die Verbesserung.

55+"kcud",,,,,#v?
  @,,,,,"goose"<

In der zweiten Zeile werden Ente und eine neue Zeile (rückwärts) auf den Stapel gelegt und als Zeichenfolge ausgegeben. Nach dieser 75% igen Chance, zum Start zurückzukehren und erneut Ente zu drucken, drucken 25% (wenn sich das Fragezeichen dafür entscheidet, nach unten zu gehen) Gans und hören auf.