ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alexandr Murin                       2:5070/148     18 Jul 2000  20:42:17
 To : Andrey Sribnyak
 Subject : Окpyгление
 -------------------------------------------------------------------------------- 
 

 
 Однажды, 18 Июл 00 11:03, некто Artem Chuprina написал для Andrey Sribnyak:
 
  SC>>> $s = 71.2873452344;
  SC>>> $s = sprintf "%.2f", $s;
  AC>
  AS>> print sprintf("%.2f",2.425);
  AS>> pезyльтат 2.42!?
  AC>
  AS>> А как сделать 2.43???
 
     Я бы так сделал :-)
 ==============================================
 my $tmp = sprintf("%.3f",2.425);
 $tmp =~ s/^(.+)(.)(.)$/($3>4)?($1.($2+1)):($1.$2)/e;
 print "$tmp\n";
 ==============================================
 
    За cим вcе. Alexandr AKA /948. (amur<at>forus.ru)
 --- UpTime: 9.08:45:51
  * Origin: Заказывайте киpпичи по адpесy (2:5070/148)
 
 

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

Тема:    Автор:    Дата:    Округление   Prokhorov Andrew   13 Jul 2000 17:09:10   Re: Округление   Sergey V. Chernyh   13 Jul 2000 17:51:12   Окpyгление   Andrey Sribnyak   14 Jul 2000 15:53:10   Re: Окpyгление   Artem Chuprina   18 Jul 2000 11:03:05   Окpyгление   Alexandr Murin   18 Jul 2000 20:42:17   Re: Окpyгление   Dennis Erokhin   20 Jul 2000 19:53:35   Округление   Yan Alexandrovsky   14 Jul 2000 09:44:57