結果
問題 | No.110 しましまピラミッド |
ユーザー |
|
提出日時 | 2020-03-01 22:36:32 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 2 ms / 5,000 ms |
コード長 | 945 bytes |
コンパイル時間 | 2,691 ms |
コンパイル使用メモリ | 149,636 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-16 10:16:17 |
合計ジャッジ時間 | 3,597 ms |
ジャッジサーバーID (参考情報) |
judge6 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 4 |
other | AC * 26 |
ソースコード
func main()var ss: [][]charvar Nw: int :: cui@input().toInt(&)var W: []int :: #[Nw]intdo ss :: cui@input().split(" ")for i(0, Nw - 1)do W[i] :: ss[i].toInt(&)end forvar Nb: int :: cui@input().toInt(&)var B: []int :: #[Nb]intdo ss :: cui@input().split(" ")for i(0, Nb - 1)do B[i] :: ss[i].toInt(&)end fordo W.sort()do W.reverse()do B.sort()do B.reverse()var wb: [][]int :: [W, B]var ans: intfor i(0, 1)var id: int :: ivar idxWb: []int :: [0, 0]do idxWb[id] :: 1var lastSize: int :: wb[id][0]do id :: 1 - idvar num: int :: 1while loop1(true)while loop2(true)if(idxWb[id] = ^wb[id])break loop1end ifif(wb[id][idxWb[id]] < lastSize)do lastSize :: wb[id][idxWb[id]]do num :+ 1break loop2end ifdo idxWb[id] :+ 1end whiledo id :: 1 - idend whiledo ans :: [ans, num].max()end fordo cui@print("\{ans}\n")end func