結果

問題 No.2419 MMA文字列2
ユーザー siman
提出日時 2023-08-13 17:23:12
言語 Ruby
(3.4.1)
結果
AC  
実行時間 1,613 ms / 2,000 ms
コード長 259 bytes
コンパイル時間 166 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 12,800 KB
最終ジャッジ日時 2024-11-21 13:34:00
合計ジャッジ時間 21,048 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 2
other AC * 30
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff # 

S = gets.chomp
counter = Array.new(26, 0)

ans = 0
an = 'A'.ord

S.each_char do |s|
  ('A'..'Z').each do |c|
    next if s == c
    cnt = counter[c.ord - an]
    next if cnt <= 1

    ans += cnt * (cnt - 1) / 2
  end

  counter[s.ord - an] += 1
end

puts ans
0