Opened by Kermit at 2015-10-31 19:42
User since
2006-01-27
3890 Artikel
HausmeisterIn
2006-01-27
3890 Artikel
HausmeisterIn
Hi,
mit for my $zahl ( 0 .. 2*16 ) kannst Du alle Zahlen durchlaufen.
mit sprintf( "%016b", $zahl ) kannst Du eine 16-stellige binäre Darstellung erzeugen.
mit 6 == $binaerstring =~ tr/1/1/ kannst Du prüfen, ob genau 6 Einsen enthalten sind.
edit: fixed missing % in sprintf().
Last edited: 2015-10-31 21:06:40 +0100 (CET)
mit for my $zahl ( 0 .. 2*16 ) kannst Du alle Zahlen durchlaufen.
mit sprintf( "%016b", $zahl ) kannst Du eine 16-stellige binäre Darstellung erzeugen.
mit 6 == $binaerstring =~ tr/1/1/ kannst Du prüfen, ob genau 6 Einsen enthalten sind.
edit: fixed missing % in sprintf().
Last edited: 2015-10-31 21:06:40 +0100 (CET)
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!