Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Eugene Bodin                         2:5020/400     25 Jun 2001  18:51:59
 To : All
 Subject : Re: round()
 -------------------------------------------------------------------------------- 
 
 Hello Denis,
 
 Denis Roshchin <denis@komkon.org> wrote:
 
 DR> > > e.g. есть 73,222222222. надо получить 73,2.
 
 Кстати, я  не понял - а из 73 что нужно получить: 73.0 или 73 ?
 
 [skip]
 
 DR> В школе-то очился...
 DR> только этот способ не очень подходит:
 DR> Я не знаю в какой раз и сколько у меня будет цифр после запятой.
 
 А кто тогда это знает?
 
 DR> Хорошо, если всего xx.x
 DR> а если xx.xxxxxx, x.xxxxxxxxxxxx
 DR> Мне надо конкретно для целого числа.
 DR>
 DR> А какая функция отрубате до знака?
 
 [s]printf ( ".0f", $number);
 
 sub round{
     my ($num, $prec) = @_;
     $num= sprintf("%.${prec}f", $num);
         # Если завершающие нули не нужны:
         $num =~ s/\.?0+$//;
     return $num;
 }
 
 Best regards,
             Eugene
 --- ifmail v.2.15dev5
  * Origin: Home (2:5020/400)
 
 

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

 Тема:    Автор:    Дата:  
 round()   Denis Roshchin   25 Jun 2001 13:08:52 
 Re: round()   Konstantin Ryabov   25 Jun 2001 13:19:10 
 Re: round()   Denis Roshchin   25 Jun 2001 13:39:25 
 Re: round()   vitus@ice.ru   25 Jun 2001 14:38:02 
 Re: round()   HB   25 Jun 2001 23:33:58 
 Re: round()   Konstantin Ryabov   25 Jun 2001 15:00:16 
 Re: round()   Eugene Bodin   25 Jun 2001 18:51:59 
 round()   Igor Ivlev   05 Jun 2001 09:40:32 
 Re: round()   Alexander Babanov   08 Jul 2001 18:26:18 
 Re: round()   Alexander Babanov   25 Jun 2001 14:39:07 
 Re: round()   Denis Roshchin   26 Jun 2001 09:45:56 
 round()   Igor Ivlev   05 Jun 2001 09:36:33 
Архивное /ru.perl/1523545c1c3b.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional