|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Igor Nikolaev 2:5030/266 17 Jul 2000 19:43:55 To : Alexander Averbuh Subject : Re: Простите чайника, но оччень нужен хелп. -------------------------------------------------------------------------------- Alexander Averbuh <Alexander_Averbuh@p7.f23.n4625.z2.fidonet.org> wrote: > a> Замучился я искать в доках - есть ли в перле функция округления, типа > Я искал, но не нашел. Пришлось соорудить ее самостоятельно. > sub round{ > my $m; # private переменная но не local ! > $m = $_[0]; > $vvv=$m-int($m); > return int($m)+1 if $vvv >= 0.5; > return int($m); > } int ( $_ + 0.5 ); -- Игорь Hиколаев --- ifmail v.2.12.os.sensi * Origin: Труд облагораживает человека. (C) Сизиф (2:5030/266@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/13416003c97eb.html, оценка из 5, голосов 10
|