結果

問題 No.370 道路の掃除
コンテスト
ユーザー zazaboon
提出日時 2017-05-23 22:45:30
言語 Ruby
(3.4.1)
結果
RE  
実行時間 -
コード長 1,198 bytes
コンパイル時間 52 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 12,544 KB
最終ジャッジ日時 2024-09-19 11:51:14
合計ジャッジ時間 3,753 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 32 RE * 2
権限があれば一括ダウンロードができます
コンパイルメッセージ
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]).abs].min if(a[x+@n] != 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]).abs].min if(x-@n >= 0) 
end
t=d.count(0)
d.delete(0)
d.insert(ind,0)
lser(ind,t,d)
rser(ind,t,d)
p @ans
=begin
=end
0