Submission #4172


Source Code Expand

#!/usr/bin/perl

use warnings;
use strict;

my $num = <STDIN>;
chomp($num);
my $ans = <STDIN>;
chomp($ans);

my @ans_num = (0, 0, 0, 0);

for (my $i = 0; $i < $num; $i++) {
	my $buf = substr($ans, $i, 1);
	$buf--;
	$ans_num[$buf]++;
}

my $max = 0;
foreach my $buf (@ans_num) {
	if ($max < $buf) {
		$max = $buf;
	}
}

my $min = $num;
foreach my $buf (@ans_num) {
	if ($min > $buf) {
		$min = $buf;
	}
}

print STDOUT "$max $min";

exit;

Submission Info

Submission Time
Task A - センター採点
User minasa
Language Perl (5.14.2)
Score 0
Code Size 473 Byte
Status WA
Exec Time 30 ms
Memory 1188 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name all
Score / Max Score 0 / 100
Status
WA × 30
Set Name Test Cases
all 00_sample1.txt, 00_sample2.txt, 01_rnd_00.txt, 01_rnd_01.txt, 01_rnd_02.txt, 01_rnd_03.txt, 01_rnd_04.txt, 01_rnd_05.txt, 01_rnd_06.txt, 01_rnd_07.txt, 01_rnd_08.txt, 01_rnd_09.txt, 01_rnd_10.txt, 01_rnd_11.txt, 01_rnd_12.txt, 01_rnd_13.txt, 01_rnd_14.txt, 01_rnd_15.txt, 01_rnd_16.txt, 01_rnd_17.txt, 01_rnd_18.txt, 01_rnd_19.txt, 02_all_1.txt, 02_all_2.txt, 02_all_3.txt, 02_all_4.txt, 03_mini_1.txt, 03_mini_2.txt, 03_mini_3.txt, 03_mini_4.txt
Case Name Status Exec Time Memory
00_sample1.txt WA 30 ms 1136 KB
00_sample2.txt WA 27 ms 1068 KB
01_rnd_00.txt WA 27 ms 128 KB
01_rnd_01.txt WA 23 ms 0 KB
01_rnd_02.txt WA 23 ms 0 KB
01_rnd_03.txt WA 24 ms 128 KB
01_rnd_04.txt WA 24 ms 128 KB
01_rnd_05.txt WA 24 ms 128 KB
01_rnd_06.txt WA 24 ms 128 KB
01_rnd_07.txt WA 24 ms 1052 KB
01_rnd_08.txt WA 24 ms 1188 KB
01_rnd_09.txt WA 24 ms 1056 KB
01_rnd_10.txt WA 24 ms 128 KB
01_rnd_11.txt WA 24 ms 128 KB
01_rnd_12.txt WA 24 ms 0 KB
01_rnd_13.txt WA 24 ms 128 KB
01_rnd_14.txt WA 24 ms 128 KB
01_rnd_15.txt WA 24 ms 128 KB
01_rnd_16.txt WA 24 ms 128 KB
01_rnd_17.txt WA 24 ms 128 KB
01_rnd_18.txt WA 24 ms 128 KB
01_rnd_19.txt WA 24 ms 128 KB
02_all_1.txt WA 24 ms 128 KB
02_all_2.txt WA 24 ms 128 KB
02_all_3.txt WA 23 ms 128 KB
02_all_4.txt WA 24 ms 128 KB
03_mini_1.txt WA 24 ms 128 KB
03_mini_2.txt WA 24 ms 1024 KB
03_mini_3.txt WA 24 ms 128 KB
03_mini_4.txt WA 24 ms 128 KB