Submission #1752667
Source Code Expand
my @seisu,@seisu_no_kachi; #入力1行目読み込む my $input=<STDIN>; chomp ($input); my ($n, $k)=split(/ /,$input); #残りの行読み込む foreach (1..$n){ chomp ($input=<STDIN>); my ($a, $b)=split(/ /,$input); push @seisu,$a; push @seisu_no_kachi, $b; } #print "$_\n"for(@seisu); #print $seisu[3]; #my $keta; #$kの桁数 #for(0..30){ # if (0 >= ($k>>$_)){ # $keta=$_; # last; # } #} my @bitwiseor; #買った整数たちの論理和が、K以下となる。 #その様な論理和として正解となり得る値を、@bitwiseorに用意する。 for my $i(0..30){ if ($k & (1 << $i)){ # $kの、下から($i+1)桁目が立っている。 my $tmp=$k; #@bitwiseor に入れることができる値を計算します。 $tmp= $k & ~(1<<$i); # 下から($i+1)桁目を0に $tmp|=(1<<$_) foreach(0..($i-1)); # 下から$i桁目までを1で埋める push @bitwiseor, $tmp } } push @bitwiseor,$k; # K自信も含める #printf("%08b\n", $_) foreach(@bitwiseor); my $goukei=0; foreach my $b(@bitwiseor) { my $goukei_tmp=0; for my $j(0..($n-1)){ unless(fukumarenai($b, $seisu[$j])){ $goukei_tmp+=$seisu_no_kachi[$j]; } } $goukei=$goukei_tmp if ($goukei < $goukei_tmp) ; } #$aに$bが含まれない場合TRUE sub fukumarenai{ my ($a, $b)=@_; return ($a^($a|$b)); } print $goukei;
Submission Info
Submission Time | |
---|---|
Task | D - IntegerotS |
User | uemurahajime |
Language | Perl (v5.18.2) |
Score | 500 |
Code Size | 1430 Byte |
Status | AC |
Exec Time | 1517 ms |
Memory | 20352 KB |
Compile Error
Parentheses missing around "my" list at ./Main.pl line 4. Useless use of a variable in void context at ./Main.pl line 4. ./Main.pl syntax OK
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 500 / 500 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | s1.txt, s2.txt, s3.txt |
All | 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt, 08.txt, 09.txt, 10.txt, 11.txt, 12.txt, 13.txt, 14.txt, 15.txt, 16.txt, 17.txt, 18.txt, 19.txt, 20.txt, 21.txt, 22.txt, 23.txt, 24.txt, 25.txt, 26.txt, 27.txt, 28.txt, 29.txt, 30.txt, 31.txt, 32.txt, 33.txt, 34.txt, 35.txt, 36.txt, 37.txt, 38.txt, 39.txt, 40.txt, 41.txt, 42.txt, 43.txt, 44.txt, 45.txt, 46.txt, 47.txt, 48.txt, 49.txt, 50.txt, 51.txt, 52.txt, 53.txt, 54.txt, 55.txt, 56.txt, 57.txt, 58.txt, 59.txt, 60.txt, s1.txt, s2.txt, s3.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
01.txt | AC | 471 ms | 16256 KB |
02.txt | AC | 704 ms | 17536 KB |
03.txt | AC | 967 ms | 16512 KB |
04.txt | AC | 780 ms | 17920 KB |
05.txt | AC | 636 ms | 16640 KB |
06.txt | AC | 644 ms | 16896 KB |
07.txt | AC | 740 ms | 18176 KB |
08.txt | AC | 690 ms | 17280 KB |
09.txt | AC | 521 ms | 17792 KB |
10.txt | AC | 824 ms | 18816 KB |
11.txt | AC | 907 ms | 18688 KB |
12.txt | AC | 895 ms | 18688 KB |
13.txt | AC | 1083 ms | 18688 KB |
14.txt | AC | 1117 ms | 18560 KB |
15.txt | AC | 821 ms | 18688 KB |
16.txt | AC | 773 ms | 18560 KB |
17.txt | AC | 1020 ms | 18688 KB |
18.txt | AC | 616 ms | 18688 KB |
19.txt | AC | 872 ms | 18688 KB |
20.txt | AC | 899 ms | 18688 KB |
21.txt | AC | 1068 ms | 18560 KB |
22.txt | AC | 859 ms | 18304 KB |
23.txt | AC | 767 ms | 18304 KB |
24.txt | AC | 633 ms | 18688 KB |
25.txt | AC | 861 ms | 17792 KB |
26.txt | AC | 981 ms | 18688 KB |
27.txt | AC | 776 ms | 18176 KB |
28.txt | AC | 825 ms | 17408 KB |
29.txt | AC | 896 ms | 18688 KB |
30.txt | AC | 1009 ms | 17920 KB |
31.txt | AC | 913 ms | 17664 KB |
32.txt | AC | 929 ms | 20352 KB |
33.txt | AC | 724 ms | 18560 KB |
34.txt | AC | 750 ms | 18688 KB |
35.txt | AC | 822 ms | 18688 KB |
36.txt | AC | 785 ms | 18560 KB |
37.txt | AC | 719 ms | 16640 KB |
38.txt | AC | 623 ms | 18688 KB |
39.txt | AC | 826 ms | 18688 KB |
40.txt | AC | 773 ms | 17664 KB |
41.txt | AC | 682 ms | 18560 KB |
42.txt | AC | 804 ms | 18560 KB |
43.txt | AC | 723 ms | 18688 KB |
44.txt | AC | 648 ms | 18560 KB |
45.txt | AC | 605 ms | 18688 KB |
46.txt | AC | 684 ms | 18560 KB |
47.txt | AC | 1517 ms | 18688 KB |
48.txt | AC | 1489 ms | 18688 KB |
49.txt | AC | 142 ms | 16256 KB |
50.txt | AC | 145 ms | 16512 KB |
51.txt | AC | 2 ms | 512 KB |
52.txt | AC | 2 ms | 384 KB |
53.txt | AC | 2 ms | 384 KB |
54.txt | AC | 2 ms | 384 KB |
55.txt | AC | 2 ms | 512 KB |
56.txt | AC | 2 ms | 512 KB |
57.txt | AC | 2 ms | 512 KB |
58.txt | AC | 2 ms | 512 KB |
59.txt | AC | 2 ms | 384 KB |
60.txt | AC | 2 ms | 512 KB |
s1.txt | AC | 2 ms | 384 KB |
s2.txt | AC | 2 ms | 384 KB |
s3.txt | AC | 2 ms | 512 KB |