結果

問題 No.1391 ±1 Abs Sum
コンテスト
ユーザー so4649
提出日時 2021-02-12 22:23:55
言語 PyPy3
(7.3.15)
結果
WA  
実行時間 -
コード長 1,219 bytes
コンパイル時間 247 ms
コンパイル使用メモリ 82,176 KB
実行使用メモリ 109,588 KB
最終ジャッジ日時 2024-07-19 22:50:25
合計ジャッジ時間 5,293 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 21 WA * 13
権限があれば一括ダウンロードができます

ソースコード

diff # 

n,k = map(int,input().split())
a = list(map(int,input().split()))

k = n-k

ans = 10**15

b = [1]*(n-k)+[-1]*k
ruiseki = [0]*(n+1)
for i in range(n):
    ruiseki[i+1] = ruiseki[i]+b[i]
base = 0
before_base = -1
while base+1 < n and ruiseki[base+1] < (n-2*k+1)//2:
    before_base = base
    while base+1 < n and a[base] == a[before_base]:
        base += 1
left = sum(abs(a[i]-a[base]) for i in range(n-k))+sum(-abs(a[base]-a[i]) for i in range(n-k,n))
ans = min(ans,left)
if before_base != -1:
    left = sum(abs(a[i]-a[before_base]) for i in range(n-k))+sum(-abs(a[before_base]-a[i]) for i in range(n-k,n))
    ans = min(ans,left)



b = [-1]*k+[1]*(n-k)
ruiseki = [0]*(n+1)
for i in range(n):
    ruiseki[i+1] = ruiseki[i]+b[i]
base = n-1
before_base = -1
while 0 < base and ruiseki[n]-ruiseki[base] < (n-2*k+1)//2:
    before_base = base
    while 0 < base and a[base] == a[before_base]:
        base -= 1
right = sum(-abs(a[i]-a[base]) for i in range(k))+sum(abs(a[base]-a[i]) for i in range(k,n))
ans = min(ans,right)
if before_base != -1:
    right = sum(-abs(a[i]-a[before_base]) for i in range(k))+sum(abs(a[before_base]-a[i]) for i in range(k,n))
    ans = min(ans,right)

ans = min(ans,left,right)
print(ans)
0