結果
問題 | No.1968 Distance |
ユーザー |
![]() |
提出日時 | 2022-06-03 22:38:10 |
言語 | cLay (20241019-1) |
結果 |
AC
|
実行時間 | 2 ms / 2,000 ms |
コード長 | 467 bytes |
コンパイル時間 | 4,573 ms |
コンパイル使用メモリ | 175,528 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-21 03:02:29 |
合計ジャッジ時間 | 3,318 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 25 |
ソースコード
#define MD 998244353ll n;Mint f(Mint x1,Mint x2,ll a){Mint y1=1/x1;Mint y2=(x2==0?x2:1/x2);Mint d=y1-y2;Mint c1=(y1+y2)/2;Mint c2=1-c1;ll n1=0,n2=0;ll f=0;while(n1+n2<n){if(a){--a;n2+=n2+1;c2/=2;}else{if(f=!f){n1+=n1+1;c1/=2;}else{n2+=n2+1;c2/=2;}}}return d*(a||f?c1:c2);}{rd(n);Mint z;rep(i,42){z+=f(1+Mint(2)**i,1+Mint(2)**(i+1),i+1);}z+=f(1+Mint(2)**42,0,43);wt(z*2);}