Codegolf: Difference between revisions

From NoName e.V.
Jump to navigation Jump to search
No edit summary
No edit summary
 
(58 intermediate revisions by 16 users not shown)
Line 1: Line 1:
=== Challenge #1 ===
Es gelten die [[Codegolf/Generische_Regeln|generischen Regeln]] und STALLMANCATs Ratschläge:
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?
 
[[image:stallmancatdont128610053697188637.jpg]]
 
=== Challenge #5: RGB2Rv10 ===
"Interpretiere einen esoterischen 2D Taschenrechner"
 
[[Codegolf/RGB2Rv10|klick mich]]
 
=== Challenge #4: WPA-Passphrase generieren ===
"Generiere einen 63 Zeichen-String gleichverteilt aus printable ASCII"
 
[[Codegolf/wpa|klick mich]]


==== mxf: Perl ====
=== Challenge #3: Wochentagberechnung ===
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2
"Wie ist der Wochentag eines bestimmten Datums?"


65+2 Zeichen
[[Codegolf/3|klick mich]]


==== urs: Perl ====
aktiv? NEIN - In der Auswertung
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2


56+2 Zeichen
Höchstens haltbar bis/hoogstens houdbaar tot: 27.07.2008 00:00 CEST


==== [[User:PhilFry|PhilFry]]: Ruby ====
=== Challenge #2: Unlambda ===
  ruby -nle'$y=$y||{};$y[$_.downcase!]=0;r=$_.tr("a-z","n-za-m");$y[r]&&(p $_+"->"+r)' < /usr/share/dict/web2
Ein [http://www.madore.org/~david/programs/unlambda/ Unlambda] Interpreter. Genauere Zielvorgaben gibt es bald.


73 Zeichen
Na, dieses Loch war dann doch einwenig zu umfangreich?


==== Ch3ka: php ====
aktiv? NEIN
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?>
122 Chrs


==== [[User:Kungi|Kungi]]: Python ====
=== Challenge #1: aka. wie alles anfing ===
import sys
e=dict([(a,0)for a in open(sys.argv[1]).read().lower().split()])
for w in e:
  b=w.encode('rot13')
  if b in e:
  print w+" -> "+b


kungi@BeerBook: wc golf.py                                                                                                                 
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?
      6      19    140 golf.py


==== k-zed: common lisp ====
die Antworten sind [[Codegolf/1|hier]]


(with-open-file (s "/usr/share/dict/web2")
aktiv? NEIN
  (let ((d (make-hash-table :test #'equal)))
    (loop for l = (read-line s nil) until (not l)
          do (setf (gethash (string-downcase l) d) t))
    (maphash
      (lambda (k v)
        (let ((p (map 'string (lambda (c) (code-char (+ (mod (- (char-code c) 84) 26) 97))) k)))
          (when (gethash p d) (format t "~A -> ~A~%" k p)))) d)))


[[Category:Projekte]]
[[Category:Projekte]]

Latest revision as of 21:09, 3 October 2013

Es gelten die generischen Regeln und STALLMANCATs Ratschläge:

Stallmancatdont128610053697188637.jpg

Challenge #5: RGB2Rv10

"Interpretiere einen esoterischen 2D Taschenrechner"

klick mich

Challenge #4: WPA-Passphrase generieren

"Generiere einen 63 Zeichen-String gleichverteilt aus printable ASCII"

klick mich

Challenge #3: Wochentagberechnung

"Wie ist der Wochentag eines bestimmten Datums?"

klick mich

aktiv? NEIN - In der Auswertung

Höchstens haltbar bis/hoogstens houdbaar tot: 27.07.2008 00:00 CEST

Challenge #2: Unlambda

Ein Unlambda Interpreter. Genauere Zielvorgaben gibt es bald.

Na, dieses Loch war dann doch einwenig zu umfangreich?

aktiv? NEIN

Challenge #1: aka. wie alles anfing

<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?

die Antworten sind hier

aktiv? NEIN