結果

問題 No.1233 割り切れない気持ち
コンテスト
ユーザー siman
提出日時 2020-10-20 11:21:43
言語 Ruby
(4.0.2)
コンパイル:
ruby -w -c _filename_
実行:
ruby _filename_
結果
AC  
実行時間 382 ms / 3,153 ms
コード長 398 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 233 ms
コンパイル使用メモリ 8,960 KB
実行使用メモリ 38,528 KB
最終ジャッジ日時 2026-04-03 04:00:50
合計ジャッジ時間 8,872 ms
ジャッジサーバーID
（参考情報） 		judge2_1 / judge5_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 39
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
raw source code 

N = gets.to_i
A = gets.split.map(&:to_i)
M = A.max
C = Array.new(M + 1, 0)
D = Array.new(M + 1, 0)

ans = 0

A.each do |a|
  C[a] += 1
  ans += a
end

ans *= N

M.downto(1) do |i|
  C[i - 1] += C[i]
end

=begin
1.upto(M) do |i|
  i.step(M, i) do |j|
    D[i] += C[j]
  end
end
=end

A.uniq.each do |i|
  i.step(M, i) do |j|
    D[i] += C[j]
  end
end

A.each do |a|
  ans -= D[a] * a
end

puts ans
0