#!/usr/bin/perl -w
my @in;
while(chomp($_ = )) {
push @in, $_;
last if $. >= 2;
}
print $in[0] x $in[1], "\n";
my @in;
while(chomp($_ = )) {
push @in, $_;
last if $. >= 2;
}
print $in[0] x $in[1], "\n";
- Nov 11 Fri 2011 15:11
技術小秘訣:輸入一字串及一數字(分成2列輸入)，把字串重複n次輸出
留言列表
留言列表發表留言
奇科技術文件 (2)
IT領域職涯與課程說明會
