← Journal · Archiv

Coding Skills 2

August 23, 2004

Der Gewinner vom letzten »Encoded reloaded« hat seinen Gewinn heute erhalten.
Zeit für ein neues Rätsel. Diesmal ein »Coding Contest«. Man kann es sicherlich
auch mit einem Texteditor lösen - man braucht dann aber sicher länger.
Das Bild unten setzt sich aus Rauten und Punkten zusammen. Die Punkte können zu
Rauten werden, wenn Sie in ihrer unmittelbaren Nachbarschaft (links oben, links,
links unten, mitte oben, usw.) mindestens zwei Rauten befinden. Eine Raute wird hingegen
wieder zu einem Punkt. Sie hat also eine Überlebensdauer von einem Zyklus. Die Quizfrage: Wie sieht das Bild nach vier Zyklen aus?

…………………………….
…………………………….
..#………………………….
..#………………#…………
..#…###.#….#…….#….###…
..#..#..#.##########.#.###.#..#…
..#..###..#.#.##.#.#.#.#.#.###….
…##.###.#.#.##.#.#.#.#.#.#……
………………………###….
…………………………….

Die Lösung muß 100% korrekt sein. Hilfestellung meinerseits wird nicht gegeben, solange der Contest läuft. Sieger ist, wär als erster die richtige Lösung in den Comment-Bereich postet.
Natürlich gibt es wieder etwas zu gewinnen. Der Sieger darf sich unter dieses Preisen etwas aussuchen.

  • SMS-Dienst für seine Webseite (bis die Prepaidkarte leer ist)
  • Die DVD »Olympia - Fest der Völker« von Leni Riefenstahl
  • Ein »Perry Rhodan«-Roman meiner Wahl
  • Das Buch »1984« von George Orwell
  • Das Buch »Die Welle« von Morton Rhue

Viel Erfolg.

Nachtrag: Proton hat die richtige Antwort nach nicht einmal 30 Minuten parat gehabt. Erstaunliche Leistung. Glückwunsch. Das Bild sieht nach vier Zyklen so wie u. g. aus. Ab diesem Zeitpunkt invertiert es sich nur noch in jedem weiteren Zyklus. Somit sieht es selbst nach 4.000 Zyklen immer noch gleich aus.

..#.######………………###…
#.#.#…..##################…#..
#.#.#.####………………###.#.
#.#.##….############.#####…#.#
#.#.#.###.#….#…….#….###.#.
#.#..#..#.##########.#.###.#..#.#.
#.#..###..#.#.##.#.#.#.#.#.###.#.#
.#.##.###.#.#.##.#.#.#.#.#.#…#.#
#.#…….#.#….#.#.#.#.#.####.#.
.#.########.######.#.#.#.##….#..

Nachtrag: Ich habe als Beispiel das Windows-Programm hoch geladen, mit dem ich das Ergebnis überprüft habe.

17 Kommentare

Proton ·

..#.######………………###…
#.#.#…..##################…#..
#.#.#.####………………###.#.
#.#.##….############.#####…#.#
#.#.#.###.#….#…….#….###.#.
#.#..#..#.##########.#.###.#..#.#.
#.#..###..#.#.##.#.#.#.#.#.###.#.#
.#.##.###.#.#.##.#.#.#.#.#.#…#.#
#.#…….#.#….#.#.#.#.#.####.#.
.#.########.######.#.#.#.##….#..

martzell ·

Dafür benötige ich meinen ehemaligen Performa 5200.

Okay, geht auch ohne.

Vielleicht habe ich die Regeln falsch verstanden. Kommt das ungefähr hin?

…………………………….
…………………………….
..##….#…………………#…
..##…#.#…#….###…#…##.##.
……##.#..###..#.#######…..##.
………#.#..#..#…….#..###…
………#.#.#….######……….
……..#..#…….####…..##….
……..###…………….#..#…
……………………….##….

paxos ·

…………………………….
…………………………….
…………………………….
.#.#…#……………………..
.#.#.#…#.########.#.#.#………
.#.#.###.#……….#.#.#.#.##….
…##…##.#.####.#.#.#.#.#…….
…..###.#.#……#.#.#.#.#.##….
……………………#.#…….
……………………….#…..

mh?

paxos ·

Wenn, dann eher das:

..#.######………………###…
#.#.#…..##################…#..
#.#.#.####………………###.#.
#.#.##….############.#####…#.#
#.#.#.###.#….#…….#….###.#.
#.#..#..#.##########.#.###.#..#.#.
#.#..###..#.#.##.#.#.#.#.#.###.#.#
.#.##.###.#.#.##.#.#.#.#.#.#…#.#
#.#…….#.#….#.#.#.#.#.####.#.
.#.########.######.#.#.#.##….#..

paxos ·

mhf, war ich wohl wieder zu langsam

lemming ·

Proton hat die richtige Lösung. Paxos auch, aber leider zu spät.

Welchen Gewinn möchtest du nun haben, Proton? Wie bist du auf die Lösung gekommen? Hast du es mit einem Texteditor geschrieben?

wonderer ·

Hmm, man kann es mit einem texteditor lösen, ist aber langsamer… mit was löst man das denn dann besser ???

lemming ·

Mit einem selbst geschrieben Programm oder Skript. Ich lade das Programm mit dem ich die Ergebnisse überprüft habe vielleicht heute Nachmittag hoch.

g3no ·

Deine Rätsel sind entweder zu leicht oder der IQ Deiner Leser ist zu hoch.
Ich hatte Dir ja eines versprochen, das lässt aber leider noch ein wenig auf sich warten…

lemming ·

Die Rätsel sind wohl zu leicht, g3no. Dennoch schätze ich meine überintelligenten Leser *schleim* :))

paxos ·

Aber bitte beim nächsten Rätsel wieder das Buch als Preis
*grummel*

Habs übrigens per Delphi gelöst. Gibts für den Source den Trostpreis? *g*

martzell ·

Not Found
The requested URL /files/coding-skills2.zip was not found on this server.

Wo ich grade am motzen bin. Es passiert mir immer noch dass ich zuerst auf das Logo klicke um auf die Startseite zurückzukommen. Stattdessen muss ich auf den schon gewählten Reiter “journal” klicken. Das macht keinen Sinn. Der Reiter ist doch schon ausgewählt. Alles in mir sträubt sich unbewusst dagegen darauf zu klicken.

Ein schönes Beispiel für eines der wenigen Probleme mit einer Reiternavigation. Jede Seite muss auch einen Reiter bekommen. Sonst zeigt der Reiter nicht richtig an wo ich mich befinde. Das ist ein Fehler.

paxos ·

@martzell: Da ich dich nicht zwingen will, einem Fremden zu Vertrauen indem du eine Binary von ihm ausführst, hier der (Delphi)Source meiner Lösung.

Man nehme 2 TMemo’s, NewGrid und OldGrid:

procedure TForm1.Cycle;
var
i,e: Integer;
succs: Byte;
begin
NewGrid.Clear;

for i:=0 to OldGrid.Lines.Count-1 do
begin
for e:=0 to Length(OldGrid.lines[i]) do
begin
succs := 0;
{ Erste Zeile? }
if i>0 then
if OldGrid.lines[i-1][e] = ‘#’ then inc(succs);
{ oben links? }
if (i>0) and (e>0) then
if OldGrid.Lines[i-1][e-1] = ‘#’ then inc(succs);
{ Links? }
if (e>0) then
if OldGrid.Lines[i][e-1] = ‘#’ then inc(succs);
{ Links unten! }
if (i0) then
if OldGrid.Lines[i+1][e-1] = ‘#’ then inc(succs);
{ Unten? }
if (i0) and (e= 2 then
NewGrid.lines.text := NewGrid.lines.text + ‘#’
else NewGrid.lines.text := NewGrid.lines.text + ‘.’;
end;

NewGrid.lines.text := NewGrid.lines.text + #10;
end;
end;

paxos ·

Schön, HTML dreht wegen den größer / kleiner zeichen hohl.

Bitte löschen, danke, lieber Lemmy.

lemming ·

So, der Link ist gefixxt. Martzell, das mit dem Logo anklicken, da hast du recht. Das werde ich gleich ändern.

Uli ·

Du hast bitte was hochgeladen? Das Windowsprogramm? oh, bitte. Schimpf dann bitte nich auf Exchange - du willst es doch gar nicht besser.

lemming ·

Ich weiß nicht was du meinst Uli. Nur weil Microsoft schlechte Software unter Windows programmiert (Windows eingeschlossen), muß ich noch lange nicht so ein schlechter Programmierer sein. Oder meinteste du, ich solle nicht über Microsoft klagen, wenn ich diese Platform unterstütze? In beiden Fällen, kann ich dir antworten: Microsoft macht scheiss Software, natürlich gehören sie nicht unterstützt. Eine breite Basis die es zur Zeit gibt, kann man aber nicht ignorieren. Ich hätte das Beispiel auch als PERL-Code zeigen können, aber da hätten bestimmt von den zwei Menschen die sich diese Sache runter ziehen nur noch einer von dafür interessiert.

Kommentar hinterlassen