|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : alexander smishlajev 2:5100/14.8 18 Jan 2001 10:50:46 To : Yuriy Kaminskiy Subject : округление -------------------------------------------------------------------------------- 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; эстет, блин. а писать вместо простого вызова стандартной функции четыре строчки непонятно чего -- культурно? а ругать человека, который, в отличие от тебя, языком владеет, да еще в присутствии молодежи, -- культурно? читайте, батенька, доки. они рулез! конкретно про округление написано в четвертой секции faqа: perldoc -q round. YK> Хотя из ее название это не очевидно, но перловая int() возвращает YK> в действительности не целый, а вещественный результат :) в действительности оно возвращает скаляр. и про это в документации тоже написано. желаю здравствовать, alex. --- GoldED 3.0.1 * Origin: enter any 11-digit prime number to continue... (FidoNet 2:5100/14.8) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/224353a66bc83.html, оценка из 5, голосов 10
|