結果
問題 | No.1747 Many Formulae 2 |
ユーザー |
![]() |
提出日時 | 2021-11-19 21:38:24 |
言語 | D (dmd 2.109.1) |
結果 |
AC
|
実行時間 | 2 ms / 2,000 ms |
コード長 | 773 bytes |
コンパイル時間 | 1,481 ms |
コンパイル使用メモリ | 169,044 KB |
実行使用メモリ | 6,944 KB |
最終ジャッジ日時 | 2024-06-22 13:19:08 |
合計ジャッジ時間 | 2,173 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 19 |
ソースコード
import std;void main() {string S = readln.chomp;ulong N = S.length;long[long] list;void f(long num, long plus, ulong cnt) {if (cnt == N) {++list[num+plus];}else {long d = S[cnt] - '0';f(num+plus*10+d, 0, cnt+1);f(num, plus*10+d, cnt+1);}}f(0L, 0L, 0L);long res;foreach (val; list.byValue) {res += val / 2;}foreach (key; list.byKey) {if (key == 1) {res -= list[key] / 2;}long m = 2;while (m * m <= key) {if (key % m == 0) {res -= list[key] / 2;break;}++m;}}res.writeln;}