Programmierrätsel & Code Golf

8
Shantae Dance Matching

Im ursprünglichen Shantae-Spiel gibt es Transformationstänze, die Sie rechtzeitig mit dem D-Pad, A und B eingeben müssen. Wenn Sie während des Tanzens eine vordefinierte Sequenz abschließen, verwandeln Sie sich in die entsprechende Form (oder teleportieren oder heilen). . Ihre Aufgabe ist es, den...

8
Geben Sie das Datum im Mel-Kalender aus

Der Mel-Kalender wird in der fiktiven Welt von Kaldia verwendet. Ihr Ziel ist es, Daten in den Mel-Kalender umzuwandeln. Dieser Kalender hat 13 Monate mit jeweils 28 Tagen plus 1 oder 2 zusätzliche Tage nach dem letzten Monat. Ein Jahr, das durch 4, aber nicht durch 100 oder durch 400 teilbar ist,...

7
Brachylog , 12 Bytes

Qualle , 12 11 9 Bytes \P$'* i Probieren Sie es online! Erläuterung Das obige Programm entspricht dem folgenden funktionalen Pseudocode: \ P $ i '* map_prefixes(print, reshape(input(), '*')) Die $(Umformung) erzeugt eine Reihe von NSternchen. \PErstellt eine Funktion, die eine Liste (oder einen...

7
Mach mir einen Laib Brot, bevor ich gefeuert werde!

Hintergrundgeschichte Nicht wirklich real, sshh! Alles begann eines Tages, als ein Mitarbeiter zum Geburtstag meines Chefs ein hausgemachtes Brot mitbrachte . Mein Chef mochte dieses Brot wirklich und er wollte ein anderes. Leider hat mein Kollege gekündigt, und mein Chef braucht mich , um ihm ein...

6
Trainieren

C 450 Zeichen Bearbeiten: entfernt zero Bearbeiten: nur mit plusundminus Ich habe nach dem kürzesten Ausdruck gesucht, der Zeichen hinzufügt und die Bedingung wahr hält. Ich fand plus ten plus fiveist 15 lang und fügt 15 der Zeichenfolge hinzu. Ich brauche nur Ausdrücke für die ersten 15 Zahlen,...

6
Eine 4x4 Herausforderung

Es gibt ein Denkspiel namens Enumerate (das ich basierend auf Takuzu gemacht habe ). Ihre Herausforderung besteht darin, dieses Spiel zu spielen. Aufgabe Löse ein 4x4 Enumerate / Takuzu-Spiel. Erhalten Sie ein Startraster über STDIN oder Befehlszeile. Das gelöste Raster über STDOUT ausgeben oder in...

6
NASM x86_64 - 349 283 Byte

MS-DOS-COM-Datei, 56 Byte Hier der Dateiinhalt in hexadezimaler Schreibweise: b4 09 ba 2c 01 cd 21 b2 2f e8 11 00 b2 2d e8 0c 00 b2 5c e8 07 00 b2 7c e8 02 00 eb ea b4 02 cd 21 b2 08 cd 21 b9 05 00 f4 e2 fd c3 4c 6f 61 64 69 6e 67 2e 2e 2e 20 24 Der übereinstimmende Assembler-Code sieht...

5
Python 3.5, 135 Bytes

CJam ( 39 37 Bytes) A,1>e!{5ew{2Mtz}2*::+)-!},3f/Ma*Sf*N* Online-Demo (Warnung: Die Ausführung kann mehr als eine Minute dauern und die Meldung "Dieses Skript abbrechen?" Wird vom Browser angezeigt). Arbeitet durch Filtern aller möglichen Raster mit 5ewzuzuordnen [a b c d e f g h i] zu [[a b c d...

4
> <>, 21 bis 19 Bytes

> <>, 21 bis 19 Bytes 'rd3*70.r l?!;o90.< Probieren Sie es hier aus! Verwendet zur Vereinfachung den Interpreter *> <>, dies ist jedoch gültiger Code> <>. Wenn ein Fehler erlaubt ist, kann dies in 16 Bytes erfolgen: 'd3*}70.!r !|o| Probieren Sie es hier...

4
Java 8, 485 Bytes

Java 8, 485 Bytes Könnte die Benennung der Funktion dstattdessen um weitere 5 Bytes reduzieren divideoder um weitere 16 Bytes, wenn die Klassendefinition nicht gezählt wird. public class G{int l(String a){return a.length();}String s(String n,String m){while(l(n)>l(m))m=0+m;String a="";for(int...

3
Canvas , 5 4 Bytes

Canvas , 5 4 Bytes ║Q↷↷ Erste Canvas Antwort, fangen wir also mit einer einfachen an. :) -1 Byte danke an @dzaima . Die Schrägstriche werden beim Spiegeln oder Drehen in Canvas automatisch konvertiert. Hätte 1 Byte sein können ╬( Online testen ), aber leider werden die Punkte auch .in einfache...

3
Haskell, 183

199 Zeichen in Oktave: m=@(x)mod(x,1928049029);[d,l]=scanf('%d');c=d(1);e=repmat(int64(d(2:2:l)),1,c);[_,b]=gcd(e-e',1928049029*ones(c));b=eye(c)+m(e.*b);x=b(1,:);for i=2:c;x=m(x.*b(i,:));end;disp(m(sum(m(x'.*d(3:2:l)))))

2
Python 136

Python 136 Ich bin sicher, jemand kann das besser - ich habe Tkinter noch nie benutzt. Insbesondere wette ich, dass die l.pack()und l["text"]können vermeidbar sind. Golf gespielt from Tkinter import* from datetime import datetime as d r=Tk() l=Label(r) l.pack() while 1:

2
MATL , 25 Bytes

MATL , 25 Bytes Dies funktioniert für Eingaben bis zu 16: 10,i:^9/Y[t0)Yftb!w\~s1=) Die folgende Version verwendet 31 Bytes und funktioniert bis zu 18. Dafür 19werden ca. 4 GB Arbeitsspeicher benötigt (ich konnte es nicht ausführen). 10,i:^9/Y[t0)5X2Y%Yfotb!w\~s1=) Beispiel >> matl >...

2
R , 84 77 Bytes

R , 84 77 Bytes -7 Bytes dank mb7744 unique(lapply(x<-sort(table(scan()),T),function(y)as.double(names(x[x==y])))) Liest von stdin; Gibt eine Liste mit Untervektoren von ganzen Zahlen in aufsteigender Reihenfolge zurück. Wenn wir Strings anstelle von ints zurückgeben könnten, dann könnte ich 11...

1
MuPAD 113 - 8 = 105

MuPAD 113 - 8 = 105 g:=[0,ithprime(i)$i=1..n]:f:=_for_in:f(l,g,f(d,g,f(b,g,f(a,g,f(c,g,if l+d+b+a+c=n then print(l,d,b,a,c)end))))) Diese Version druckt auch alle Permutationen jeder Lösung: 0, 0, 0, 0, 7 0, 0, 0, 2, 5 0, 0, 0, 5, 2 0, 0, 0, 7, 0 0, 0, 2, 0, 5 ... Und ja, es erstellt eine viel zu...

1
Perl 5 , 52 + 1 ( -n) = 53 Bytes

Wolfram Language (Mathematica) , 55 Byte ""<>#&/@Union@Tuples[{#,ToUpperCase@#}]&@*Characters Probieren Sie es online! ist der transponierte Operator (und wird in Mathematica als hochgestelltes T angezeigt