結果
問題 | No.2750 Number of Prime Factors |
ユーザー | tails |
提出日時 | 2024-05-10 21:30:23 |
言語 | Perl (5.40.0) |
結果 |
AC
|
実行時間 | 56 ms / 2,000 ms |
コード長 | 112 bytes |
コンパイル時間 | 227 ms |
コンパイル使用メモリ | 12,800 KB |
実行使用メモリ | 12,928 KB |
最終ジャッジ日時 | 2024-12-20 04:24:18 |
合計ジャッジ時間 | 2,658 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 2 |
other | AC * 19 |
コンパイルメッセージ
Main.pl syntax OK
ソースコード
use bigint; $n=<>+0; $a=1; while($n>=($a*=<2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59>)){ ++$i; } print$i;