結果
| 問題 | 
                            No.8035 2018
                             | 
                    
| コンテスト | |
| ユーザー | 
                             | 
                    
| 提出日時 | 2019-03-20 11:15:01 | 
| 言語 | Crystal  (1.14.0)  | 
                    
| 結果 | 
                             
                                AC
                                 
                             
                            
                         | 
                    
| 実行時間 | 783 ms / 2,000 ms | 
| コード長 | 116 bytes | 
| コンパイル時間 | 11,581 ms | 
| コンパイル使用メモリ | 296,748 KB | 
| 実行使用メモリ | 37,108 KB | 
| 最終ジャッジ日時 | 2024-06-30 19:45:31 | 
| 合計ジャッジ時間 | 20,237 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge5 / judge4 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 7 | 
ソースコード
M=5111443
a=[0]*-~M
(1..M).map{|i|(1..M/i).each{|j|a[i*j]+=1}}
a=(1..M).select{|i|a[i]==4}
p a[gets.not_nil!.to_i-1]