0 Пользователей и 1 Гость просматривают эту тему.
ondr:int($max/10)*10+10;
FANTAzeRus:Имею: допустим число 43 Хочу: Получить число ближайшее(большее) 50
хочется услышать обоснование подгрузки POSIX в данном случае.
ondr:вызывают лишь негативную реакцию.
use Math::Round qw(nhimult);my $osn = 10;my @a = qw(1 4 5 9 1.1 1.12 10 10.00000001 19 -1 -1.1 -10);print $_, " => ", nhimult($osn, $_),"\\n" for @a;