結果
問題 |
No.441 和か積
|
ユーザー |
|
提出日時 | 2017-05-18 00:04:39 |
言語 | Scheme (Gauche-0.9.15) |
結果 |
RE
|
実行時間 | - |
コード長 | 273 bytes |
コンパイル時間 | 125 ms |
コンパイル使用メモリ | 6,944 KB |
実行使用メモリ | 16,384 KB |
最終ジャッジ日時 | 2024-09-17 21:06:16 |
合計ジャッジ時間 | 2,541 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | RE * 3 |
other | RE * 30 |
ソースコード
(letrec ((n (read)) (m (read))) (print (cond ((or (and (string=? "0" n) (string=? "0" m)) (and (string=? "2" n) (string=? "2" m))) "E") ((or (string=? "0" n) (string=? "0" n) (string=? "1" n) (string=? "1" m)) "S") (else "P"))))