結果
問題 | No.1447 Greedy MtSaka |
ユーザー |
![]() |
提出日時 | 2024-11-27 15:13:28 |
言語 | Nim (2.2.0) |
結果 |
AC
|
実行時間 | 2 ms / 2,000 ms |
コード長 | 479 bytes |
コンパイル時間 | 5,064 ms |
コンパイル使用メモリ | 66,420 KB |
実行使用メモリ | 5,248 KB |
最終ジャッジ日時 | 2024-11-27 15:13:35 |
合計ジャッジ時間 | 6,035 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 17 |
ソースコード
import algorithm, sequtils, strutilslet n = parseInt readLine stdinvar xs, ys: seq[float]for _ in 0 ..< n:letxy = stdin.readLine.split.map parseFloatxs.add xy[0]ys.add xy[1]let minY = min ysif minY < 0: ys.applyIt it - minYletxs2 = xs.rotatedLeft 1ys2 = ys.rotatedLeft 1var sq = 0.0for i in 0 ..< n:letx = xs[i] - xs2[i]y = ys[i] - ys2[i]if x > 0: sq += x * ys2[i] + y * x / 2else: sq += x * ys2[i] + y * x / 2echo int sq * 2