컴퓨터 엑셀 워드 포토샵 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Saturday, March 03, 2007

Perl/펄] 제곱 기호,함수, 거듭제곱(세제곱,네제곱), 몇 승 구하기; Raise Power, Pow


펄에서는 ** 라는 "연산자"로 숫자를 제곱할 수 있습니다. 별표(애스터리스크) 기호를 2개 중복한 것입니다. 예를 들어 3의 제곱은
3 ** 2
로 표현하면 됩니다. 3의 네제곱은 3 ** 4 이렇게 표현합니다.

다음은, 0의 0승부터 즉 0의 0제곱부터, 5의 5승 즉 5의 다섯제곱까지 구하는 방법입니다.

"0의 0승" 즉 "0의 0제곱"은 수학적으로 정의되어 있지 않지만, 프로그래밍 언어에서는 1로 간주합니다.

Perl에서, 숫자 제곱 연산자 ** 사용 법


파일명: example.pl
#!/usr/bin/perl
use strict; use warnings;

  my $result;

  for (my $i = 0; $i <= 5; $i++) {
    print "\n";
    for (my $j = 0; $j <= 5; $j++) {
      $result = $i ** $j;
      printf("%d 의 %d 승 = %d\n", $i, $j, $result);
    }
  }


실행 결과 화면:
D:\Z>example.pl

0 의 0 승 = 1
0 의 1 승 = 0
0 의 2 승 = 0
0 의 3 승 = 0
0 의 4 승 = 0
0 의 5 승 = 0

1 의 0 승 = 1
1 의 1 승 = 1
1 의 2 승 = 1
1 의 3 승 = 1
1 의 4 승 = 1
1 의 5 승 = 1

2 의 0 승 = 1
2 의 1 승 = 2
2 의 2 승 = 4
2 의 3 승 = 8
2 의 4 승 = 16
2 의 5 승 = 32

3 의 0 승 = 1
3 의 1 승 = 3
3 의 2 승 = 9
3 의 3 승 = 27
3 의 4 승 = 81
3 의 5 승 = 243

4 의 0 승 = 1
4 의 1 승 = 4
4 의 2 승 = 16
4 의 3 승 = 64
4 의 4 승 = 256
4 의 5 승 = 1024

5 의 0 승 = 1
5 의 1 승 = 5
5 의 2 승 = 25
5 의 3 승 = 125
5 의 4 승 = 625
5 의 5 승 = 3125

D:\Z>



POSIX 모듈의 제곱 함수


그리고 또한 POSIX 의 pow() 함수로도 제곱과 거듭제곱을 계산할 수 있습니다. 다음은 3의 네제곱을 구하는 코드입니다.
#!/usr/bin/perl
use strict; use warnings;

use POSIX;

  print pow(3, 4);
  # 출력 결과: 81




▶▶ Perl/펄] 제곱근 함수, 루트 근사값 계산 방법, 음수의 제곱근 구하기; Root Negative Number

0 Comments:

Post a Comment

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Previous Posts
Monthly Archives
Top