結果
問題 |
No.1623 三角形の制作
|
ユーザー |
|
提出日時 | 2021-07-28 00:06:27 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 242 ms / 2,000 ms |
コード長 | 626 bytes |
コンパイル時間 | 2,115 ms |
コンパイル使用メモリ | 146,644 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-16 12:40:59 |
合計ジャッジ時間 | 6,636 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge6 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 2 |
other | AC * 19 |
ソースコード
func main() var n: int :: cui@inputInt() var rn: []int :: #[3001]int var gn: []int :: #[3001]int var bn: []int :: #[3001]int for(1, n) do rn[cui@inputInt()] :+ 1 end for for(1, n) do gn[cui@inputInt()] :+ 1 end for for(1, n) do bn[cui@inputInt()] :+ 1 end for var cumR: []int :: #[3001]int for r(1, 3000) do cumR[r] :: cumR[r - 1] + rn[r] end for var ans: int :: 0 for g(1, 3000) if(gn[g] <> 0) for b(1, 3000) if(bn[b] <> 0) do ans :+ gn[g] * bn[b] * (cumR[lib@min(g + b - 1, 3000)] - cumR[lib@max(g, b) - 1]) end if end for end if end for do cui@print("\{ans}\n") end func