ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Anthony Dragunov                     2:5010/1.111   03 May 2000  10:48:30
 To : Alexander Shulgin
 Subject : <none>
 -------------------------------------------------------------------------------- 
 

 
 Воскресенье Апрель 30 2000 15:17, Alexander Shulgin wrote to All:
 
  AS> как пpеобpазовывать двоичный код, в десятичный?
 
  аколенная сборка:
 
 #!/usr/bin/perl
 
 $a='1100011011011100011' ;
 $b=1;
 $c=0;
 foreach $i (reverse split '',$a) {
     $c+=($i*$b);
     $b*=2
 }
 print $c,"\n" ;
 
 Anthony (dragunov@mail.ru)
 HackZone RC5 Team member // www.brainbench.com ID #114 / понты дешевые
 --- GoldED 2.50.A0715+
  * Origin: No keyboard detected - press F1 to continue (2:5010/1.111)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    <none>   Alexander Shulgin   30 Apr 2000 15:17:23   <none>   Anthony Dragunov   03 May 2000 10:48:30   Re: <none>   Anton Petrusevich   03 May 2000 13:46:34   Re: <none>   Anton Petrusevich   03 May 2000 14:18:02   <none>   Albert N. MICHEEV   03 May 2000 10:41:59   <none>   Anthony Dragunov   04 May 2000 08:26:46