Im australischen Fußball sind Tore 6 Punkte wert und Hintertreffer 1 Punkt. Punktzahlen können die Anzahl der Tore und die Anzahl der Rückstände sowie die Gesamtpunktzahl umfassen. Bestimmen Sie anhand der Anzahl der Tore und Rückstände für zwei verschiedene Teams, welches Team das Spiel gewonnen hat.
Nehmen Sie vier Ganzzahlen g1, b1, g2, b2
als Eingabe und geben Sie zwei unterschiedliche Werte aus, unabhängig davon, ob das erste oder das zweite eingegebene Team gewonnen hat. Das Eingabeformat ist flexibel, aber die Eingabereihenfolge muss deutlich machen, welches Team zuerst an der Reihe ist. Zum Beispiel g1, g2, b1, b2
wäre erlaubt, b1, g2, g1, b2
würde aber nicht.
Testfälle
Testfälle werden true
für den ersten Mannschaftssieg und false
für den zweiten Mannschaftssieg verwendet. Die Eingabe erfolgt im Format (g1,b1),(g2,b2)
.
(1,0),(0,1) true
(2,0),(0,11) true
(10,8),(11,1) true
(0,0),(1,0) false
(100,100),(117,0) false
(7,7),(5,12) true
(2,0),(0,13) false
Als Beispiel für die Eingabe (10,8),(11,1)
erzielte Team 1 10 Tore und 8 Rückstande, was insgesamt Punkte ergibt, während Team 2 Punkte erzielte, sodass Team 1 gewinnt .
Keine Eingabe ist ein Unentschieden - das Verhalten Ihres Programms bei der Zeicheneingabe spielt keine Rolle.
quelle
Antworten:
Gelee , 3 Bytes
Ein monadischer Link, der eine Liste mit ganzen Zahlen akzeptiert
[[g1,b1],[g2,b2]]
, die eine Liste mit[1]
oder ergibt[2]
.(Unentschieden würden ergeben
[1,2]
)... oder ein volles Programm drucken
1
oder2
.Probieren Sie es online! Oder sehen Sie sich die Testsuite an .
Wie?
quelle
CP-1610 Baugruppe ( Intellivision ), 9 DECLEs 1 - 12 Byte
Eine Routine, die Eingaben in R0 (g1 ), R1 ( b1 ), R2 ( g2 ) und R3 ( b 2 ) vornimmtb2 ) vornimmt und das Vorzeichen setzt, wenn die 2. Mannschaft gewinnt, oder es anderweitig löscht.
Der CP-1610 hat keine Multiplikationsanweisung und kann jeweils nur um 1 oder 2 Positionen verschoben werden. Daher berechnen wir stattdessen den folgenden Ausdruck:
Vollständiger Testcode
Ausgabe
Screenshot von jzIntv
1. Ein CP-1610-Opcode wird mit einem 10-Bit-Wert codiert, der als "DECLE" bezeichnet wird. Diese Routine ist 9 DECLE lang.
quelle
Python 3 , 26 Bytes
Probieren Sie es online!
Keine unglaublich interessante Antwort.
quelle
C # (Visual C # Interactive Compiler) , 22 Byte
Probieren Sie es online!
quelle
=>
an->
Internationale phonetische esoterische Sprache , 12 Bytes (WIP-Sprache)
Ausgänge
1
für wahr und0
falsch.Noch kein TIO-Interpreter, kann aber ausgeführt werden, indem Sie das Repository oben klonen und aufrufen
python main.py "code here"
.Die TL; DR der Sprache ist, dass es sich um eine stapelbasierte Sprache handelt, in der jede Anweisung ein Zeichen aus dem Internationalen Phonetischen Alphabet ist .
Übernimmt Argumente als 4 Eingaben von STDIN in der Reihenfolge
g1, b1, g2, b2
. Könnte auf weniger als 12 Bytes reduziert werden, sobald die Schleifen vollständig implementiert sind.quelle
Perl 6 , 13 Bytes
Probieren Sie es online!
Nimmt die Eingabe als 4 Ganzzahlen und macht im Grunde nur, was die Frage verlangt
quelle
Kaskade , 16 Bytes
Probieren Sie es online!
Verwendet dieselbe
6*a+b
Logik für beide Teams und druckt dann, ob die erste Punktzahl höher ist als die anderequelle
J , 12 Bytes
Probieren Sie es online!
quelle
33 , 22 Bytes
Probieren Sie es online!
Nimmt die Eingabe als 4 durch Trennzeichen getrennte Ganzzahlen und gibt 0 für das erste gewinnende Team und 1 für das zweite zurück.
Erläuterung:
-4 Byte, wenn nicht eindeutige Ergebnisse zulässig sind:
Gibt die Punktedifferenz aus. Positive Ergebnisse bedeuten den ersten Mannschaftssieg, negative den zweiten Mannschaftssieg.
quelle
Scala , 11 Bytes
Probieren Sie es online!
Nimmt 4 ganze Zahlen in der Reihenfolge von
g1 b1 g2 b2
.quelle
Brainfuck ,
453836322928 BytesProbieren Sie es online!
Vielen Dank an @Jo King für -8 Bytes
Die Eingabe ist b1, g1, b2, g2 (Tore und Hintergründe werden ausgetauscht). Druckt Prints, wenn Team 1 gewonnen hat. Gibt null aus, wenn Team 2 gewonnen hat.
Code:
quelle
:;<=>?
usw.) verwenden, wenn Sie höhere Punktzahlen eingeben möchten.Scratch 3.0
1716 Blöcke,160143 BytesScore stammt aus vorgeschlagen Scoring - Methode hier
1 Block / 17 Bytes gespeichert dank @A (oder Uzer_A bei Scratch) _
Probieren Sie es einfach aus
Als Scratchblocks :
Antwortverlauf
Ziemlich genau ein Port meiner Keg-Antwort.
Probieren Sie es einfach aus
Die Eingabe erfolgt in Form von
g1, b1, g2, b2
In Scratchblocks-Syntax
Jetzt weiß ich, was du sagst ... warum Golf von Grund auf?!? Nun, es macht Spaß. Deshalb. Scratch ist auch insofern einzigartig, als es hier auf CGCC nicht sehr häufig vorkommt.
quelle
Sauber , 34 Bytes
Probieren Sie es online!
Definiert
$ :: Int Int Int Int -> Bool
mit Argumenten wie$ g1 b1 g2 b2
quelle
Fass , 10 Bytes (SBCS)
Probieren Sie es online!
Als Australier bin ich mit dieser Frage einverstanden.
Eingabe erfolgt als:
Und 0 bedeutet Team 2 und 1 bedeutet Team 1
Erklärt
quelle
05AB1E ,
65 BytesEingabe als verschachtelte Liste
[[g1,b1],[g2,b2]]
. Ausgabe,0
wenn Team 1 gewinnt und1
wenn Team 2 gewinnt.-1 Byte Danke an @Grimy für die Erinnerung
δ
.Probieren Sie es online aus oder überprüfen Sie alle Testfälle .
Erläuterung:
Eine scheinbar willkürliche Basiskonvertierung auf verschachtelten Listen funktioniert nicht ohne ein explizites
Map-Outer-Produkt.quelle
Zsh, 19 Bytes
versuche es online !!
Eingabereihenfolge ist
g1 b1 g2 b2
. Ausgangscodes0==true
und1==false
quelle
C (gcc) ,
39353126 Bytes0 ist falsch
1 ist wahr
Eingang zur Funktion ist (g1, b1, g2, b2)
Danke an Doorknob für -5 Bytes
Probieren Sie es online!
quelle
return
, aber Sie können auch ein Implementierungsdetail für 26 Byte missbrauchen .Brain-Flak , 62 Bytes
Ausgänge,
1
wenn die erste Mannschaft verloren hat, und0
ob sie gewonnen (oder unentschieden) hat.Probieren Sie es online!
quelle
PowerShell , 35 Byte
Probieren Sie es online!
quelle
Poetisch , 751 Bytes
Probieren Sie es online!
Junge, das war schwer zu schreiben.
Die Eingabe erfolgt im folgenden Format:
Dies gibt den Fehlercode "Mismatched IF / EIF", wenn das erste Team gewinnt, und "Unexpected EOF", wenn das zweite Team gewinnt. (Ein Unentschieden gilt übrigens als zweiter Mannschaftssieg).
quelle
Retina 0.8.2 , 34 Bytes
Probieren Sie es online! Link enthält Testfälle.
1
Wird ausgegeben, wenn die zweite Mannschaft nicht gewinnt und0
wenn ja. Erläuterung:Konvertieren Sie die Eingabe in Unary.
Multiplizieren Sie in jedem Paar die erste Zahl mit sechs und addieren Sie die zweite.
Überprüfen Sie, ob die zweite Zahl größer als die erste ist. Alternativ können Sie festlegen,
^(1*);\1
welche Ausgabe erfolgen soll,0
wenn das erste Team gewinnt und1
welche nicht.quelle
PHP (7.4), 32 Bytes
Probieren Sie es online!
quelle
ABC-Assembler ,
11174 BytesProbieren Sie es online!
Es wird nichts über den grundlegendsten Stapeloperationen verwendet:
quelle
Perl 5 , 18 Bytes
Probieren Sie es online!
Die Eingabe ist zeilengetrennt:
quelle
Wolfram Language (Mathematica) , 13 Byte
Probieren Sie es online!
geradlinig und langweilig
quelle
Leerzeichen, 115 Bytes
Buchstaben
S
(Leerzeichen),T
(Tabulator) und (Zeilenvorschub) werdenN
nur als Hervorhebungen hinzugefügt.[..._some_action]
nur als Erklärung hinzugefügt.Druck ,
0
wenn Team 1 gewinnt und1
(auch sein könnte-1
für den gleichen Byte-count) , wenn Team 2 Siege.Probieren Sie es online aus (nur mit Leerzeichen, Tabulatoren und Zeilenumbrüchen).
Erklärung im Pseudocode:
Eine kleine Anmerkung: da sind die Eingänge garantiert≥ 0 Ich nutze das zu meinem Vorteil, um die Eingaben als Heap-Adressen für die nachfolgenden Eingaben wiederzuverwenden. Bei Herausforderungen, die negative Eingaben haben können, müsste ich erneut
0
als Heap-Adresse pushen , da Heap-Adressen nicht negativ sein können.quelle
Ruby , 21 Bytes
Probieren Sie es online!
Hat die langweilige Lösung umgangen, ein Byte gespeichert und es einen Tag genannt.
quelle
SimpleTemplate , 84 Byte
Nur der einfache Ansatz "Multiplizieren mit 6, Summieren und Vergleichen", außer dass die mathematische Unterstützung extrem fehlt.
Ausgaben
0
für false und01
für true.Ungolfed:
Alles sollte klar sein mit den Kommentaren (
{@// ... }
) hinzugefügt.quelle
Japt , 6 Bytes
Eingabe als 2D-Array. Ausgänge
1
für Team 1,0
für ein Unentschieden oder-1
für Team 2.Versuch es
quelle
Los , 44 Bytes
Probieren Sie es online!
quelle