mwultong Blog ... 프로그래밍 / 계산기

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

 
Monday, March 05, 2007

Perl/펄] 19단 출력, 19단표 만들기, 십구단 십구단표; 19 x 19 Table


구구단의 확장 버전인 19단을 만들어서 출력하는 프로그램입니다. 그렇지만 십구단을 아이에게 외우게 하는 것에는 찬성하지 않습니다. 자녀의 수학 실력을 향상시키려면 이런 것을 외우게 하는 것보다, 공학용 계산기를 한 대 사주고 장난감처럼 가지고 놀게 하는 것이 좋습니다. 수학이라는 것이 곱셈만으로 이루어져 있는 것은 아니지 않겠습니까.

아무튼 아래와 같은 19단표가 자동으로 만들어집니다:

출력 파일인 19단표(out.txt)의 내용:

(※ 스크롤 박스 사용법: 박스 안을 마우스로 클릭한 후, 키보드의 좌우 화살표키를 누르면 양옆으로 움직일 수 있습니다. 박스에서 다시 나오려면, 박스 바깥의 아무곳이나 클릭하면 됩니다.)

                                           < 19단 >

 2 X  1 =   2    3 X  1 =   3    4 X  1 =   4    5 X  1 =   5    6 X  1 =   6    7 X  1 =   7
 2 X  2 =   4    3 X  2 =   6    4 X  2 =   8    5 X  2 =  10    6 X  2 =  12    7 X  2 =  14
 2 X  3 =   6    3 X  3 =   9    4 X  3 =  12    5 X  3 =  15    6 X  3 =  18    7 X  3 =  21
 2 X  4 =   8    3 X  4 =  12    4 X  4 =  16    5 X  4 =  20    6 X  4 =  24    7 X  4 =  28
 2 X  5 =  10    3 X  5 =  15    4 X  5 =  20    5 X  5 =  25    6 X  5 =  30    7 X  5 =  35
 2 X  6 =  12    3 X  6 =  18    4 X  6 =  24    5 X  6 =  30    6 X  6 =  36    7 X  6 =  42
 2 X  7 =  14    3 X  7 =  21    4 X  7 =  28    5 X  7 =  35    6 X  7 =  42    7 X  7 =  49
 2 X  8 =  16    3 X  8 =  24    4 X  8 =  32    5 X  8 =  40    6 X  8 =  48    7 X  8 =  56
 2 X  9 =  18    3 X  9 =  27    4 X  9 =  36    5 X  9 =  45    6 X  9 =  54    7 X  9 =  63
 2 X 10 =  20    3 X 10 =  30    4 X 10 =  40    5 X 10 =  50    6 X 10 =  60    7 X 10 =  70
 2 X 11 =  22    3 X 11 =  33    4 X 11 =  44    5 X 11 =  55    6 X 11 =  66    7 X 11 =  77
 2 X 12 =  24    3 X 12 =  36    4 X 12 =  48    5 X 12 =  60    6 X 12 =  72    7 X 12 =  84
 2 X 13 =  26    3 X 13 =  39    4 X 13 =  52    5 X 13 =  65    6 X 13 =  78    7 X 13 =  91
 2 X 14 =  28    3 X 14 =  42    4 X 14 =  56    5 X 14 =  70    6 X 14 =  84    7 X 14 =  98
 2 X 15 =  30    3 X 15 =  45    4 X 15 =  60    5 X 15 =  75    6 X 15 =  90    7 X 15 = 105
 2 X 16 =  32    3 X 16 =  48    4 X 16 =  64    5 X 16 =  80    6 X 16 =  96    7 X 16 = 112
 2 X 17 =  34    3 X 17 =  51    4 X 17 =  68    5 X 17 =  85    6 X 17 = 102    7 X 17 = 119
 2 X 18 =  36    3 X 18 =  54    4 X 18 =  72    5 X 18 =  90    6 X 18 = 108    7 X 18 = 126
 2 X 19 =  38    3 X 19 =  57    4 X 19 =  76    5 X 19 =  95    6 X 19 = 114    7 X 19 = 133

 8 X  1 =   8    9 X  1 =   9   10 X  1 =  10   11 X  1 =  11   12 X  1 =  12   13 X  1 =  13
 8 X  2 =  16    9 X  2 =  18   10 X  2 =  20   11 X  2 =  22   12 X  2 =  24   13 X  2 =  26
 8 X  3 =  24    9 X  3 =  27   10 X  3 =  30   11 X  3 =  33   12 X  3 =  36   13 X  3 =  39
 8 X  4 =  32    9 X  4 =  36   10 X  4 =  40   11 X  4 =  44   12 X  4 =  48   13 X  4 =  52
 8 X  5 =  40    9 X  5 =  45   10 X  5 =  50   11 X  5 =  55   12 X  5 =  60   13 X  5 =  65
 8 X  6 =  48    9 X  6 =  54   10 X  6 =  60   11 X  6 =  66   12 X  6 =  72   13 X  6 =  78
 8 X  7 =  56    9 X  7 =  63   10 X  7 =  70   11 X  7 =  77   12 X  7 =  84   13 X  7 =  91
 8 X  8 =  64    9 X  8 =  72   10 X  8 =  80   11 X  8 =  88   12 X  8 =  96   13 X  8 = 104
 8 X  9 =  72    9 X  9 =  81   10 X  9 =  90   11 X  9 =  99   12 X  9 = 108   13 X  9 = 117
 8 X 10 =  80    9 X 10 =  90   10 X 10 = 100   11 X 10 = 110   12 X 10 = 120   13 X 10 = 130
 8 X 11 =  88    9 X 11 =  99   10 X 11 = 110   11 X 11 = 121   12 X 11 = 132   13 X 11 = 143
 8 X 12 =  96    9 X 12 = 108   10 X 12 = 120   11 X 12 = 132   12 X 12 = 144   13 X 12 = 156
 8 X 13 = 104    9 X 13 = 117   10 X 13 = 130   11 X 13 = 143   12 X 13 = 156   13 X 13 = 169
 8 X 14 = 112    9 X 14 = 126   10 X 14 = 140   11 X 14 = 154   12 X 14 = 168   13 X 14 = 182
 8 X 15 = 120    9 X 15 = 135   10 X 15 = 150   11 X 15 = 165   12 X 15 = 180   13 X 15 = 195
 8 X 16 = 128    9 X 16 = 144   10 X 16 = 160   11 X 16 = 176   12 X 16 = 192   13 X 16 = 208
 8 X 17 = 136    9 X 17 = 153   10 X 17 = 170   11 X 17 = 187   12 X 17 = 204   13 X 17 = 221
 8 X 18 = 144    9 X 18 = 162   10 X 18 = 180   11 X 18 = 198   12 X 18 = 216   13 X 18 = 234
 8 X 19 = 152    9 X 19 = 171   10 X 19 = 190   11 X 19 = 209   12 X 19 = 228   13 X 19 = 247

14 X  1 =  14   15 X  1 =  15   16 X  1 =  16   17 X  1 =  17   18 X  1 =  18   19 X  1 =  19
14 X  2 =  28   15 X  2 =  30   16 X  2 =  32   17 X  2 =  34   18 X  2 =  36   19 X  2 =  38
14 X  3 =  42   15 X  3 =  45   16 X  3 =  48   17 X  3 =  51   18 X  3 =  54   19 X  3 =  57
14 X  4 =  56   15 X  4 =  60   16 X  4 =  64   17 X  4 =  68   18 X  4 =  72   19 X  4 =  76
14 X  5 =  70   15 X  5 =  75   16 X  5 =  80   17 X  5 =  85   18 X  5 =  90   19 X  5 =  95
14 X  6 =  84   15 X  6 =  90   16 X  6 =  96   17 X  6 = 102   18 X  6 = 108   19 X  6 = 114
14 X  7 =  98   15 X  7 = 105   16 X  7 = 112   17 X  7 = 119   18 X  7 = 126   19 X  7 = 133
14 X  8 = 112   15 X  8 = 120   16 X  8 = 128   17 X  8 = 136   18 X  8 = 144   19 X  8 = 152
14 X  9 = 126   15 X  9 = 135   16 X  9 = 144   17 X  9 = 153   18 X  9 = 162   19 X  9 = 171
14 X 10 = 140   15 X 10 = 150   16 X 10 = 160   17 X 10 = 170   18 X 10 = 180   19 X 10 = 190
14 X 11 = 154   15 X 11 = 165   16 X 11 = 176   17 X 11 = 187   18 X 11 = 198   19 X 11 = 209
14 X 12 = 168   15 X 12 = 180   16 X 12 = 192   17 X 12 = 204   18 X 12 = 216   19 X 12 = 228
14 X 13 = 182   15 X 13 = 195   16 X 13 = 208   17 X 13 = 221   18 X 13 = 234   19 X 13 = 247
14 X 14 = 196   15 X 14 = 210   16 X 14 = 224   17 X 14 = 238   18 X 14 = 252   19 X 14 = 266
14 X 15 = 210   15 X 15 = 225   16 X 15 = 240   17 X 15 = 255   18 X 15 = 270   19 X 15 = 285
14 X 16 = 224   15 X 16 = 240   16 X 16 = 256   17 X 16 = 272   18 X 16 = 288   19 X 16 = 304
14 X 17 = 238   15 X 17 = 255   16 X 17 = 272   17 X 17 = 289   18 X 17 = 306   19 X 17 = 323
14 X 18 = 252   15 X 18 = 270   16 X 18 = 288   17 X 18 = 306   18 X 18 = 324   19 X 18 = 342
14 X 19 = 266   15 X 19 = 285   16 X 19 = 304   17 X 19 = 323   18 X 19 = 342   19 X 19 = 361



아래의 펄 소스로 위의 십구단표를 얻을 수 있습니다.


19단 표 (십구단 표) 출력 소스 코드

스크립트 파일명: example.pl
※ 아래 박스 클릭 후, 키보드 화살표 키로 좌우 스크롤 가능함
#!/usr/bin/perl
use strict; use warnings;

  print "\n                                           < 19단 >\n";


  for (my $z = 0; $z <= 12; $z += 6) { # 19단을 3행으로 나누어 출력
    for (my $j = 1; $j <= 19; $j++) {
      print "\n";
      for (my $i = 2 + $z; $i <= 7 + $z; $i++) {  # 2단에서 19단까지
        printf("%2d X %2d = %3d   ", $i, $j, $i * $j);
      }
    }
    print "\n";
  }

  print "\n";


위의 소스는 19단 표를 그대로 화면에 출력하는데, 화면의 폭이 좁아서, 출력 결과가 이상하게 나올 것입니다.

따라서
도스창(명령 프롬프트;CMD.EXE)에서
example.pl > out.txt
이렇게 실행하여, 출력 결과를 out.txt 라는 텍스트 파일로 저장해야 합니다. out.txt 파일을 메모장 등의 편집기로 열어보면 됩니다.



구구단 만들기: ▶▶ Perl/펄] 구구단 출력, 구구단표 만들기; Multiplication Table 99




tag: perl
Perl | 펄

0 Comments:

<< Home RSS 2.0 feed

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