結果
問題 |
No.201 yukicoderじゃんけん
|
ユーザー |
![]() |
提出日時 | 2015-09-05 21:26:36 |
言語 | Scheme (Gauche-0.9.15) |
結果 |
RE
|
実行時間 | - |
コード長 | 400 bytes |
コンパイル時間 | 31 ms |
コンパイル使用メモリ | 6,940 KB |
実行使用メモリ | 17,408 KB |
最終ジャッジ日時 | 2024-07-19 04:13:05 |
合計ジャッジ時間 | 1,819 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | RE * 20 |
ソースコード
(define (System.out.println x) (begin (write x) (newline) ) ) (let ( (SA (symbol->string (read))) (PA (read)) (XA (symbol->string (read))) (SB (symbol->string (read))) (PB (read)) (XB (symbol->string (read))) ) (cond ((= PA PB) (System.out.println "-1")) ((> PA PB) (System.out.println SA)) ((< PA PB) (System.out.println SB)) ) )