Schrift
[thread]8791[/thread]

Rätsel der Woche 2007/5: viel Spaß dabei :)

Leser: 2


<< |< 1 2 >| >> 19 Einträge, 2 Seiten
Ishka
 2007-02-27 06:00
#74595 #74595
User since
2003-08-04
771 Artikel
HausmeisterIn
[Homepage] [default_avatar]
Achtung: Die E-Mail-Adresse hat sich geändert, bitte nicht versehentlich an die alte schreiben.

Momentan habe ich 11 Aufgaben vorrätig. Vorschläge für neue Rätsel nehme ich immer gerne an (bitte als Mail und als Betreff für Vorschläge rdw-vorschlag enthalten lassen (in klein).
RDW 2007/5 - Raetsel der Woche Nummer 5 des Jahres 2007
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


Regeln:
~~~~~~~
       * Bitte nicht vor Ablauf der ersten 72 Stunden (= drei Tage)
         nach Veröffentlichung Hinweise, Spoiler, Lösungen oder
         Lösungsteile posten!

       * Verständnisfragen dürfen selbstverständlich auch vor
         Ablauf der drei Tage in diesem Thread gestellt
         werden. Diskussionen über Lösungsansätze gehören aber
         nicht hierher.

       * Die Verwendung von Modulen ist generell erlaubt, wird jedoch
         das ganze Problem von einem Modul erschlagen, so macht das
         die Lösung langweilig -- und das ist nicht unbedingt der
         Sinn dieser Rätsel.

       * Erst wenn die drei Tage abgelaufen sind, werden Lösungen in
         das Wiki:Wiki gestellt und hier verlinkt.

       * Sobald die Lösungen veröffentlicht wurden darf hier
         natürlich über sie diskutiert werden.

       * Die Lösungen sollten nicht unbedingt von jedem Einzelnen
         gepostet, sondern vor allem per E-Mail an mich geschickt
         werden, damit ich sie testen, "bewerten"  und zusammenfassen
         kann. Die Adresse dafür lautet:

          ishka <---Minus---> rdw <---At---> kettenbruch <---Punkt---> de

         Im Betreff sollte 'RDW' (also wirklich RDW und nicht Rätsel der
         Woche oder andere Ausformulierungen) und die Nummer des Rätsels
         stehen. Hilfreich wäre neben dem Quelltext der Benutzername
         im Forum sowie Perl- und OS-Version (siehe auch perl -v).


Die Aufgabe:
~~~~~~~~~~~~
        Gib zu einer Liste von Feldern (auf einem Feld mit zwei
            Koordinaten), welche zusammenhängen, den Umfang an, wobei
            Löcher zu ignorieren sind.

Beispiel:
~~~~~~~~~
            Die Ascii-Zeichnungen bei der Eingabe gehören nicht wirklich zur
            Eingabe, sondern dienen nur zum schnelleren Verständnis der Beispiele
            Es genügt, wenn man eine der im Beispiel gezeigten
            Parametervarianten implementiert (also ;-separierte Liste mit je
            zwei einstelligen Zahlen, oder ;-separierte Liste mit je mit , getrennten
            beliebigen ganzen Zahlen)
        Beispiel:
           Eingabe:
           11
                        #
           Ausgabe:
           4
           Eingabe:
           -3,1;-3,2;-2,2
                        #
                        ##
           Ausgabe:
            8
           Eingabe:
           11;22
                         #
                          #
           Ausgabe:
           8
           Eingabe:
           11;12;22;10;20;30;40;31;32
                        ####
                        # #
                        ###
           Ausgabe:
            14
sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}
Taulmarill
 2007-02-27 12:33
#74596 #74596
User since
2004-02-19
1750 Artikel
BenutzerIn

user image
Müsste die Ausgabe beim zweiten Beispiel nicht 6 und beim dritten 7 sein? Falls nicht, dann erklär das bitte noch mal genauer.
$_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78
0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0
F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B
Crian
 2007-02-27 12:37
#74597 #74597
User since
2003-08-04
5873 Artikel
ModeratorIn
[Homepage]
user image
[quote=Ishka,27.02.2007, 05:00]Beispiel:
Eingabe:
11
#
Ausgabe:
4
Eingabe:
-3,1;-3,2;-2,2
#
##
Ausgabe:
8
Eingabe:
11;22
#
#
Ausgabe:
8
Eingabe:
11;12;22;10;20;30;40;31;32
####
# #
###
Ausgabe:
14
[/quote]
Kann es sein, dass in den unteren Beispielen die Kommata fehlen?

Schade ohne die Löcherregel wäre es so simpel...\n\n

<!--EDIT|Crian|1172572676-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
Crian
 2007-02-27 12:40
#74598 #74598
User since
2003-08-04
5873 Artikel
ModeratorIn
[Homepage]
user image
[quote=Taulmarill,27.02.2007, 11:33]Müsste die Ausgabe beim zweiten Beispiel nicht 6 und beim dritten 7 sein? Falls nicht, dann erklär das bitte noch mal genauer.[/quote]
Nein, es geht um den Umfang. Wobei die Kantenlänge jedes Kästchens eins ist. Deshalb hat ein Kästchen den Umfang 4, zwei benachbarte 6, drei in L-Form angeordnete 8 und so weiter.
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite
renee
 2007-02-27 12:48
#74599 #74599
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
@Crian: Nein, fehlen nicht. So wie es da steht, ist es ein Alias für 1,1;1,2;2,2;...

Quote
(also ;-separierte Liste mit je
zwei einstelligen Zahlen, oder ;-separierte Liste mit je mit , getrennten
beliebigen ganzen Zahlen)
\n\n

<!--EDIT|renee|1172573334-->
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
docsnyder
 2007-02-27 13:51
#74600 #74600
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
... meine Lösung ist unterwegs ;o)

Gruss, Doc
betterworld
 2007-02-28 19:35
#74601 #74601
User since
2003-08-21
2614 Artikel
ModeratorIn

user image
und hoch
docsnyder
 2007-02-28 23:47
#74602 #74602
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
danke, aber es werden noch andere Lösungen kommen, und daran muss erst gemessen werden ;o)
betterworld
 2007-03-01 00:34
#74603 #74603
User since
2003-08-21
2614 Artikel
ModeratorIn

user image
[quote=docsnyder,28.02.2007, 22:47]danke, aber es werden noch andere Lösungen kommen, und daran muss erst gemessen werden ;o)[/quote]
Ich verstehe jetzt nicht, was Du meinst. Jedenfalls wollte ich nur dafuer sorgen, dass das Raetsel bei den Beitraegen der letzten 24 Stunden stehen bleibt.
docsnyder
 2007-03-01 00:56
#74604 #74604
User since
2005-09-08
300 Artikel
BenutzerIn
[Homepage] [default_avatar]
@betterworld

Sorry, habe Deine Bemerkung "und hoch" (auf mein Posting: "meine Lösung ist unterwegs") wohl falsch verstanden und fälschlicherweise auf meine Posting, d.h. auf meine Lösung bezogen. Das war wohl ein überheblicher Gedanke.

Habe da wohl ein Lob gesehen, das so garnicht ausgesprochen wurde.

Sorry, aber ich habe nun Dein Posting verstanden.

Bis denne, Doc
<< |< 1 2 >| >> 19 Einträge, 2 Seiten



View all threads created 2007-02-27 06:00.