PerlならサンプルコードPerl入門

log関数 - 対数を求める

1. Perl
›
2. 数値計算
›
3. 関数
›
4. log

　自然対数を求めるには、log関数を使用します。また底(てい)の変換を利用すれば、任意の底の対数を計算できます。

自然対数を求める

　自然対数を求めるにはlog関数を使用します。自然対数とは底がネイピア数eである対数のことです。

log(10);

常用対数を求める

　常用対数とは、底が10の対数のことです。底の変換公式を利用すれば、任意の底の対数を求めることができます。

sub log10 {
  my $x = shift;
  return log($x) / log(10);
}

サンプル

　対数を求めるサンプルです。

use strict;
use warnings;

# 対数の底はネイピア数e;
print "(1)自然対数\n";
print "log(3) =" . log(10) . "\n\n"; 

print "(2)常用対数\n";
print "log10(100) = " . log10(100) . "\n";

# 底が10の対数を求める関数( 底の変換を利用する )
sub log10 {
  my $x = shift;
  return log($x) / log(10);
}

ツイートする

Permalink | コメント(0) | 01:15