Forum Webscript.Ru

Программирование => Perl => Тема начата: Boroda от 07 Июля 2001, 14:16:46

Название: Округление полученного числа до n-го знака после запятой.
Отправлено: Boroda от 07 Июля 2001, 14:16:46

Господа програмисты, есть вопрос.
Как в Perle, после деления двух значений друг на друга произвести округление полученного числа до n-го знака после запятой.

 $srednee_arifmet= $razmer_massiva_log_arh/ $razmer_massiva_zero;

Буду благодарен за ответ.

Название: Округление полученного числа до n-го знака после запятой.
Отправлено: Chs от 08 Июля 2001, 21:51:32

$srednee_arifmet = sprintf("%.02f",$srednee_arifmet);

Название: Округление полученного числа до n-го знака после запятой.
Отправлено: Boroda от 09 Июля 2001, 02:00:48

Спасибо, работает, очень помогло!

Название: Округление полученного числа до n-го знака после запятой.
Отправлено: от 10 Июля 2001, 04:41:08

$digits_after_point = 4;
$srednee_arifm =~ s/(\\d+\\.\\d{$digits_after_point}?)//;
print "$1
";
Это намного быстрее.