結果

問題 No.730 アルファベットパネル
ユーザー tatt61880
提出日時 2019-03-19 22:59:14
言語 Kuin(beta)
(2019_03_17 on Wine)
結果
AC   .
実行時間 453 ms
コード長 207 Byte
コンパイル時間 507 ms
使用メモリ 47,768 KB
最終ジャッジ日時 2019-08-12 03:21:22

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
sample1.txt AC 433 ms
47,764 KB
sample2.txt AC 449 ms
47,756 KB
test1.txt AC 430 ms
47,760 KB
test2.txt AC 453 ms
47,756 KB
test3.txt AC 444 ms
47,764 KB
test4.txt AC 451 ms
47,768 KB
test5.txt AC 446 ms
47,768 KB
test6.txt AC 434 ms
47,768 KB
test7.txt AC 441 ms
47,756 KB
test8.txt AC 449 ms
47,768 KB
テストケース一括ダウンロード

ソースコード

diff #
func main()
	var S: []char :: cui@input()
	var a: []int :: #[26]int
	for i(0, ^S - 1)
		do a[S[i] $ int - 'A' $ int] :+ 1
	end for
	var ans: bool :: a.max() < 2
	do cui@print(ans ?("YES\n", "NO\n"))
end func
0