以下Perl程序的输出结果是什么?
my $str = “2 5 6 9 8”; my @str = split “ “,$str; @str = reverse @str;
foreach $str(@str){ until($str>6){ $str ++; } print "$str "; }
2 5 6 10 9
9 10 6 5 2
7 7 7 8 9
8 9 7 7 7
这道题你会答吗?花几分钟告诉大家答案吧!
扫描二维码,关注牛客网
下载牛客APP,随时随地刷题