ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Serge Shikov                         2:5020/400     18 Jan 2001  18:26:06
 To : All
 Subject : Re: округление
 -------------------------------------------------------------------------------- 
 

 alexander smishlajev wrote:
 
 > 
 > hello Yuriy!
 > 
 > wednesday january 17 2001, Yuriy Kaminskiy writes to Igor Potupchik:
 > 
 >  VP>> sprintf("%f.2",3645.2566662);
 >  YK>  Фуу, как некультурно. Если округление нужно -
 >  YK> use POSIX;
 >  YK> sub round { $_[0] >= 0 ? POSIX::floor($_[0] + 0.5) : POSIX::ceil($_[0]
 >  YK> - 0.5) } $y = round($x*100)/100; Если не нужно - $y = int($x*100)/100;
 > 
 > эстет, блин.  а писать вместо простого вызова стандартной функции четыре
 > строчки непонятно чего -- культурно?
 
 Четыре строчки с вызовом четырех функций - это много? Округления - они
 разные бывают, пример этот тут вполне уместный. А sprintf - только один
 из возможных вариантов.
 
 > а ругать человека, который, в отличие от
 > тебя, языком владеет, да еще в присутствии молодежи, -- культурно?
 
 Конечно нет, только в данном случае ты придираешься зря.
  
 > читайте, батенька, доки.  они рулез!  конкретно про округление написано в
 > четвертой секции faqа: perldoc -q round.
 
 Hу и? Там написано ровно тоже самое:
 
  use POSIX;
  $ceil   = ceil(3.5);
  $floor  = floor(3.5);
 
 И?
 --- ifmail v.2.15dev5
  * Origin: home (2:5020/400)
 
 

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