結果

問題 No.1391 ±1 Abs Sum
ユーザー kakel-sankakel-san
提出日時 2024-07-23 00:39:42
言語 C#
(.NET 8.0.203)
結果
AC  
実行時間 109 ms / 2,000 ms
コード長 2,735 bytes
コンパイル時間 8,832 ms
コンパイル使用メモリ 169,464 KB
実行使用メモリ 68,264 KB
最終ジャッジ日時 2024-07-23 00:40:09
合計ジャッジ時間 13,994 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 55 ms
30,080 KB
testcase_01 AC 53 ms
29,696 KB
testcase_02 AC 53 ms
30,080 KB
testcase_03 AC 54 ms
30,208 KB
testcase_04 AC 53 ms
30,188 KB
testcase_05 AC 55 ms
30,336 KB
testcase_06 AC 58 ms
29,824 KB
testcase_07 AC 57 ms
29,824 KB
testcase_08 AC 56 ms
30,336 KB
testcase_09 AC 55 ms
30,208 KB
testcase_10 AC 55 ms
30,208 KB
testcase_11 AC 109 ms
58,476 KB
testcase_12 AC 85 ms
53,004 KB
testcase_13 AC 92 ms
56,468 KB
testcase_14 AC 82 ms
48,248 KB
testcase_15 AC 82 ms
48,756 KB
testcase_16 AC 86 ms
52,464 KB
testcase_17 AC 88 ms
50,692 KB
testcase_18 AC 96 ms
56,284 KB
testcase_19 AC 83 ms
50,832 KB
testcase_20 AC 96 ms
57,584 KB
testcase_21 AC 84 ms
51,468 KB
testcase_22 AC 87 ms
51,180 KB
testcase_23 AC 89 ms
54,024 KB
testcase_24 AC 86 ms
52,296 KB
testcase_25 AC 88 ms
52,840 KB
testcase_26 AC 88 ms
53,600 KB
testcase_27 AC 80 ms
45,172 KB
testcase_28 AC 81 ms
45,556 KB
testcase_29 AC 89 ms
52,368 KB
testcase_30 AC 82 ms
47,616 KB
testcase_31 AC 96 ms
58,364 KB
testcase_32 AC 80 ms
49,188 KB
testcase_33 AC 83 ms
48,604 KB
testcase_34 AC 101 ms
57,372 KB
testcase_35 AC 54 ms
30,080 KB
testcase_36 AC 99 ms
68,264 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
  復元対象のプロジェクトを決定しています...
  /home/judge/data/code/main.csproj を復元しました (97 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();
        // Test();
    }
    static void Test()
    {
        var r = new Random();
        var count = 0;
        while (true)
        {
            var n = 5;
            var k = r.Next(n + 1);
            var a = new long[n];
            for (var i = 0; i < n; ++i) a[i] = r.Next(-3, 3);
            Array.Sort(a);
            // 愚直解
            var s1 = All(n, k, a);
            // 作成解
            var s2 = Abs(n, k, a);
            if (s1 != s2)
            {
                WriteLine(n + " " + k);
                // WriteLine(string.Join("\n", map.Select(m => string.Join(" ", m))));
                WriteLine(string.Join(" ", a));
                WriteLine(s1);
                WriteLine(s2);
                return;
            }
            ++count;
            if (count % 1000 == 0) WriteLine(count);
        }
    }
    static long All(int n, int k, long[] a)
    {
        var ans = long.MaxValue;
        for (var i = 0; i <= n - k; ++i) for (var x = 0; x < n; ++x)
        {
            var sub = 0L;
            for (var p = 0; p < n; ++p)
            {
                var abs = Math.Abs(a[x] - a[p]);
                if (p < i || p >= i + k) sub -= abs;
                else sub += abs;
            }
            ans = Math.Min(ans, sub);
        }
        return ans;
    }
    static void Solve()
    {
        var c = NList;
        var (n, k) = ((int)c[0], (int)c[1]);
        var a = NList;
        WriteLine(Abs(n, k, a));
    }
    static long Abs(int n, int k, long[] a)
    {
        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;
            }
        }
        return ans;
    }
}
0