提出 #19977


ソースコード 拡げる

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.

提出情報

提出日時
問題 A - GPA計算
ユーザ urutom
言語 Pascal (fpc 2.4.4)
得点 100
コード長 239 Byte
結果 AC
実行時間 20 ms
メモリ 772 KB

コンパイルエラー

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

ジャッジ結果

セット名 all
得点 / 配点 100 / 100
結果
AC × 32
セット名 テストケース
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
ケース名 結果 実行時間 メモリ
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