对所述棍子进行切割操作,使其全部被缩小为最小棒的长度。5,4,4,2,2,8,然后在一次切割操作中,我们从6根棍子中每一根做一个长度为2的切割。在下一次切割操作中,留下4根棍子(长度为非零),其长度为给定N根的长度,打印在随后的切割操作中切割的棒数。while (> (length x) 0) do ;; subtracting the min va
我有一个数字数组,字符串文件如下所示,我编写了一个perl代码,名为字符串切割器。我可以得到切割字符串,但我不能得到第一个"n“字符串由数字数组组成。有什么想法吗?我不知道为什么substr不工作。"Usage: perl program.pl [num_list] [string_file]\n";
open my $LIST, '<', $number_f or die "Ca