結果
| 問題 | 
                            No.558 575検出するやつ
                             | 
                    
| コンテスト | |
| ユーザー | 
                             kokoa1046
                         | 
                    
| 提出日時 | 2017-09-02 20:03:41 | 
| 言語 | Scheme  (Gauche-0.9.15)  | 
                    
| 結果 | 
                             
                                RE
                                 
                             
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 93 bytes | 
| コンパイル時間 | 76 ms | 
| コンパイル使用メモリ | 5,248 KB | 
| 実行使用メモリ | 16,384 KB | 
| 最終ジャッジ日時 | 2024-11-06 18:36:21 | 
| 合計ジャッジ時間 | 1,321 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge4 / judge3 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | RE * 5 | 
| other | RE * 15 | 
ソースコード
(define x (read )) (if (string-contains (symbol->string x) "575") (print "YES") (print "NO"))
            
kokoa1046