結果
問題 |
No.1965 Heavier
|
ユーザー |
|
提出日時 | 2023-10-08 23:01:30 |
言語 | C#(csc) (csc 3.9.0) |
結果 |
AC
|
実行時間 | 215 ms / 2,000 ms |
コード長 | 788 bytes |
コンパイル時間 | 1,043 ms |
コンパイル使用メモリ | 112,104 KB |
実行使用メモリ | 64,748 KB |
最終ジャッジ日時 | 2024-07-26 18:13:55 |
合計ジャッジ時間 | 7,914 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 26 |
コンパイルメッセージ
Microsoft (R) Visual C# Compiler version 3.9.0-6.21124.20 (db94f4cc) Copyright (C) Microsoft Corporation. All rights reserved.
ソースコード
using System; using static System.Console; using System.Linq; using System.Collections.Generic; class Program { static int NN => int.Parse(ReadLine()); static long[] NList => ReadLine().Split().Select(long.Parse).ToArray(); static long[][] NArr(long n) => Enumerable.Repeat(0, (int)n).Select(_ => NList).ToArray(); public static void Main() { Solve(); } static void Solve() { var n = NN; var a = NList; var b = NList; var dp = new int[n]; var ans = 0L; for (var i = 1; i < n; ++i) { if (a[i] - b[i] > a[i - 1] - b[i - 1] && a[i] + b[i] > a[i - 1] + b[i - 1]) dp[i] = dp[i - 1] + 1; ans += dp[i]; } WriteLine(ans); } }