結果

問題 No.370 道路の掃除
コンテスト
ユーザー zazaboon
提出日時 2017-05-23 22:53:46
言語 Ruby
(3.4.1)
結果
AC  
実行時間 86 ms / 2,000 ms
コード長 1,220 bytes
コンパイル時間 88 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 12,416 KB
最終ジャッジ日時 2024-09-19 11:51:18
合計ジャッジ時間 3,741 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 34
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.rb:2: warning: assigned but unused variable - a
Main.rb:3: warning: assigned but unused variable - a
Main.rb:11: warning: assigned but unused variable - a
Main.rb:16: warning: assigned but unused variable - now
Syntax OK

ソースコード

diff # 

def calcs(x,y,ax,ay,bx,by) ((ax-x)*(by-y)-(bx-x)*(ay-y))/2.0 end
def inpf() a=gets.chomp.split(" ").map(&:to_f)end
def inps() a=gets.chomp.split(" ")end  
def copy(a) Marshal.load(Marshal.dump(a)) end
def kaizyo(n)(n < 2)? 1 : (2..n).inject(:*) end
def scount(a) b=na(a.max+1);a.each{|n|b[n]+=1};return b end
def na(n=0,d=0) Array.new(n,d)end
def na2(n=0,m=0,d=0) Array.new(n){Array.new(m,d)}end
def na3(n=0,m=0,l=0,d=0) Array.new(n){Array.new(m){Array.new(l,d)}}end
def bit(n) n.to_s(2).split("").map(&:to_i) end
def inp() a=gets.chomp.split(" ").map(&:to_i)end
@n,@m= inp
d=[]; @m.times{d.push(inp[0])}
d.sort!
min = d[2]-d[0]
now  = min
ind = -1
d.each.with_index do |dd,i|
  if(dd >= 0)
  ind = i 
  break
  end
end
@ans = 99999999999
def lser(x,s,a)
  return if(x<0)
  if(s >= @n)
    @ans = [@ans,a[x].abs].min
    return
  end
  lser(x-1,s+1,a)
  @ans = [@ans,a[x].abs+(a[x] - a[x+@n-@t]).abs].min if(a[x+@n-@t] != nil) 
end
def rser(x,s,a)
  return if(x > @m)
  if(s >= @n)
    @ans = [@ans,a[x].abs].min
    return
  end
  rser(x+1,s+1,a)
  @ans = [@ans,a[x].abs+(a[x] - a[x-@n+@t]).abs].min if(x-@n+@t >= 0) 
end
@t=d.count(0)
d.delete(0)
@m-=@t
d.insert(ind,0)
lser(ind,@t,d)
rser(ind,@t,d)
p @ans
=begin
=end
0