結果

問題 No.161 制限ジャンケン
ユーザー tatt61880
提出日時 2020-04-02 00:37:39
言語 Kuin
(KuinC++ v.2021.9.17)
結果
AC  
実行時間 2 ms / 5,000 ms
コード長 767 bytes
コンパイル時間 2,389 ms
コンパイル使用メモリ 148,632 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-09-16 10:29:06
合計ジャッジ時間 3,064 ms
ジャッジサーバーID
(参考情報)
judge6 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 3
other AC * 16
権限があれば一括ダウンロードができます

ソースコード

diff #
プレゼンテーションモードにする

func main()
var ss: [][]char :: cui@input().split(" ")
var mg: int :: ss[0].toInt(&)
var mc: int :: ss[1].toInt(&)
var mp: int :: ss[2].toInt(&)
var s: []char :: cui@input()
var og: int :: 0
var oc: int :: 0
var op: int :: 0
for i(0, ^s - 1)
switch(s[i])
case 'G'
do og :+ 1
case 'C'
do oc :+ 1
case 'P'
do op :+ 1
end switch
end for
var ans: int :: 0
do ans :+ 3 * [og, mp].min()
do ans :+ 3 * [oc, mg].min()
do ans :+ 3 * [op, mc].min()
var tmp: int
do tmp :: [og, mp].min()
do og :- tmp
do mp :- tmp
do tmp :: [oc, mg].min()
do oc :- tmp
do mg :- tmp
do tmp :: [op, mc].min()
do op :- tmp
do mc :- tmp
do ans :+ [og, mg].min()
do ans :+ [oc, mc].min()
do ans :+ [op, mp].min()
do cui@print("\{ans}\n")
end func
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0