|
发表于 2004-4-11 01:39:36
|
显示全部楼层
回复: 回复: 回复: re
最初由 libinary 发表
这个就看愿不愿意写代码了,直接写81条print,不用循环也可以打出来,或者用一个循环,里面9个print也行。
下面是我写的:
- #! /usr/bin/perl -w
- $a = 1;
- for($b = 1; $b <= 9; $b++){
- printf "$a*$b=%2d ", $a*$b;
- if($b == 9){
- print "\n";
- $b = 0;
- if(++$a == 10){
- last;
- }
- }
- }
复制代码
你的代码有一点点小问题,你这样输出的不是九九乘法表,如果把if($b==9)这一行改为if($b==$a),这样输出的就是九九乘法表了。你的算法很妙,呵呵,我又学了一招!谢谢! |
|