Submission #19977


Source Code Expand

Copy
{$R-,S-,Q-,I-,O+}
var n,i:longint;
	count:array['A'..'F'] of longint;
	c:char;
begin
	readln(n);
	for i:=1 to n do begin
		read(c);
		inc(count[c]);
	end;
	writeln((count['A']*4+count['B']*3+count['C']*2+count['D'])/n:0:9);
end.

Submission Info

Submission Time
Task A - GPA計算
User urutom
Language Pascal (fpc 2.4.4)
Score 100
Code Size 239 Byte
Status AC
Exec Time 20 ms
Memory 772 KB

Compile Error

/usr/bin/ld: warning: ./link.res contains output sections; did you forget -T?

Judge Result

Set Name all
Score / Max Score 100 / 100
Status
AC × 32
Set Name Test Cases
all 00_sample_01.txt, 00_sample_02.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, 02_rndmax_01.txt, 02_rndmax_02.txt, 02_rndmax_03.txt, 02_rndmax_04.txt, 02_rndmax_05.txt, 02_rndmax_06.txt, 02_rndmax_07.txt, 02_rndmax_08.txt, 02_rndmax_09.txt, 02_rndmax_10.txt, 03_mini_01.txt, 03_mini_02.txt, 03_mini_03.txt, 03_mini_04.txt, 03_mini_05.txt, 04_samemax_01.txt, 04_samemax_02.txt, 04_samemax_03.txt, 04_samemax_04.txt, 04_samemax_05.txt
Case Name Status Exec Time Memory
00_sample_01.txt AC 19 ms 696 KB
00_sample_02.txt AC 19 ms 764 KB
01_rnd_01.txt AC 19 ms 768 KB
01_rnd_02.txt AC 20 ms 760 KB
01_rnd_03.txt AC 19 ms 664 KB
01_rnd_04.txt AC 19 ms 760 KB
01_rnd_05.txt AC 19 ms 768 KB
01_rnd_06.txt AC 19 ms 760 KB
01_rnd_07.txt AC 19 ms 692 KB
01_rnd_08.txt AC 19 ms 720 KB
01_rnd_09.txt AC 19 ms 772 KB
01_rnd_10.txt AC 19 ms 764 KB
02_rndmax_01.txt AC 18 ms 664 KB
02_rndmax_02.txt AC 19 ms 760 KB
02_rndmax_03.txt AC 18 ms 660 KB
02_rndmax_04.txt AC 19 ms 768 KB
02_rndmax_05.txt AC 19 ms 768 KB
02_rndmax_06.txt AC 19 ms 764 KB
02_rndmax_07.txt AC 19 ms 764 KB
02_rndmax_08.txt AC 18 ms 664 KB
02_rndmax_09.txt AC 19 ms 752 KB
02_rndmax_10.txt AC 19 ms 764 KB
03_mini_01.txt AC 19 ms 764 KB
03_mini_02.txt AC 19 ms 764 KB
03_mini_03.txt AC 19 ms 748 KB
03_mini_04.txt AC 19 ms 764 KB
03_mini_05.txt AC 19 ms 744 KB
04_samemax_01.txt AC 19 ms 764 KB
04_samemax_02.txt AC 19 ms 768 KB
04_samemax_03.txt AC 19 ms 732 KB
04_samemax_04.txt AC 19 ms 764 KB
04_samemax_05.txt AC 19 ms 760 KB