結果

問題 No.69 文字を自由に並び替え
ユーザー yuppe19 😺
提出日時 2015-05-02 16:21:07
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 5,000 ms
コード長 363 bytes
コンパイル時間 2,536 ms
コンパイル使用メモリ 61,668 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-29 01:54:40
合計ジャッジ時間 3,107 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 15
権限があれば一括ダウンロードができます

ソースコード

diff # 

proc sorted(s: string): string =
  if s.len <= 1: return s
  var lower:string = ""
  var upper:string = ""
  var pivot = s[0]
  for i in 1.. s.high:
    if s[i] < pivot: lower = lower & s[i]
    else: upper = upper & s[i]
  return sorted(lower) & pivot & sorted(upper)

var
  a = stdin.readLine
  b = stdin.readLine

echo if a.sorted == b.sorted: "YES" else: "NO"
0