結果

問題 No.1391 ±1 Abs Sum
ユーザー kakel-san
提出日時 2024-07-23 00:19:16
言語 C#
(.NET 8.0.404)
結果
WA  
実行時間 -
コード長 1,299 bytes
コンパイル時間 10,794 ms
コンパイル使用メモリ 170,132 KB
実行使用メモリ 221,332 KB
最終ジャッジ日時 2024-07-23 00:19:39
合計ジャッジ時間 16,400 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 33 WA * 1
権限があれば一括ダウンロードができます
コンパイルメッセージ
  復元対象のプロジェクトを決定しています...
  /home/judge/data/code/main.csproj を復元しました (102 ms)。
MSBuild のバージョン 17.9.6+a4ecab324 (.NET)
  main -> /home/judge/data/code/bin/Release/net8.0/main.dll
  main -> /home/judge/data/code/bin/Release/net8.0/publish/

ソースコード

diff # 

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();
    public static void Main()
    {
        Solve();
    }
    static void Solve()
    { checked {
        var c = NList;
        var (n, k) = (c[0], c[1]);
        var a = NList;
        var cum = new long[n + 1];
        for (var i = 0; i < n; ++i) cum[i + 1] = cum[i] + a[i];
        var ans = long.MaxValue;
        if (k == 0)
        {
            ans = Math.Min(a[0] * n - cum[n], cum[n] - a[^1] * n);
        }
        else if (k == n)
        {
            ans = a[n / 2] * n / 2 - cum[n / 2] + cum[n] - cum[n / 2] - a[n / 2] * (n - n / 2);
        }
        else
        {
            var pos = (2 * k - n - 1) / 2;
            for (var i = 0; i <= n - k; ++i)
            {
                var x = Math.Max(0, Math.Min(n - 1, pos));
                ans = Math.Min(ans, cum[i] - a[x] * i + a[x] * (x - i) - cum[x] + cum[i]
                    + cum[k + i] - cum[x] - a[x] * (k + i - x) + a[x] * (n - k - i) - cum[n] + cum[k + i]);
                pos += 2;
            }
        }
        WriteLine(ans);
    } }
}
0