結果

問題 No.8060 サンプルケース至上主義
コンテスト
ユーザー Yuzu Mashiro
提出日時 2021-04-03 11:56:33
言語 Scheme
(Gauche-0.9.15)
コンパイル:
true
実行:
gosh _filename_
結果
AC  
実行時間 18 ms / 2,000 ms
コード長 430 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 51 ms
コンパイル使用メモリ 6,272 KB
実行使用メモリ 16,256 KB
最終ジャッジ日時 2026-05-30 10:45:38
合計ジャッジ時間 1,000 ms
ジャッジサーバーID
（参考情報） 		judge2_0 / judge3_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 5
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

(print (let ((s (read-line)))
        (cond ((string=? s "0") "Nothing")
              ((string=? s "3.14159265") "pi")
              ((string=? s "1112345678999+X") "九蓮宝燈\nThirteen Orphans")
              ((string=? s "All your base are belong to us.")
               (string-join (map number->string '(3 4 4 3 6 2 2)) "\n"))
              ((string=? s "くぁｗせｄｒｆｔｇｙふじこｌｐ") "さｍｐぇ"))))
0