2018-11-07から1日間の記事一覧

全探索アルゴリズムの実装

use strict; use warnings; use utf8; use Data::Dumper; use Time::HiRes qw(gettimeofday tv_interval); binmode(STDOUT, ":utf8"); &main; sub main { my $t0 = [gettimeofday]; $\="\n"; my $input_n = 5; my @n_nums_arr = (1, 5, 7, 10, 21); my $inpu…