結果

問題 No.2906 Strange Online Judge
ユーザー 👑 MizarMizar
提出日時 2024-06-01 08:30:56
言語 Text
(cat 8.3)
結果
AC  
実行時間 1 ms / 2,000 ms
コード長 835 bytes
コンパイル時間 24 ms
コンパイル使用メモリ 6,688 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-09-09 15:04:48
合計ジャッジ時間 1,679 ms
ジャッジサーバーID
(参考情報)
judge4 / judge5
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
5,248 KB
testcase_01 AC 1 ms
5,376 KB
testcase_02 AC 1 ms
5,376 KB
testcase_03 AC 0 ms
5,376 KB
testcase_04 AC 0 ms
5,376 KB
testcase_05 AC 1 ms
5,376 KB
testcase_06 AC 1 ms
5,376 KB
testcase_07 AC 1 ms
5,376 KB
testcase_08 AC 1 ms
5,376 KB
testcase_09 AC 1 ms
5,376 KB
testcase_10 AC 0 ms
5,376 KB
testcase_11 AC 1 ms
5,376 KB
testcase_12 AC 0 ms
5,376 KB
testcase_13 AC 0 ms
5,376 KB
testcase_14 AC 1 ms
5,376 KB
testcase_15 AC 0 ms
5,376 KB
testcase_16 AC 1 ms
5,376 KB
testcase_17 AC 0 ms
5,376 KB
権限があれば一括ダウンロードができます

ソースコード

diff #

ifK<=2         # if K<=2:
  $2=K*K       #   $1 := K**6+5*K**4+6*K**2+1;
  $2=$2+1      #   $0 := K**5+4*K**3+3*K;
  $3=$2*K      #   $2 := K**4+3*K**2+1;
  $0=$3+K
  $1=$0*K
  $2=$1+$2
  $3=$2*K
  $0=$3+$0
  $1=$0*K
  $1=$1+$2
end            # end
ifK>=3         # if K>=3:
  $1=K*K       #   $1 := K**2+1;
  $1=$1+1
  $0=K         #   $0 := K;
  $2=1         #   $2 := 1;
end            # end
while$1<100000 # while $1<100000:
  $3=$0*$0     #   $1,$0,$2 := ($0*$0+$1*$1),($0*($1+$2)),($0*$0+$2*$2);
  $4=$1+$2
  $0=$0*$4
  $1=$1*$1
  $2=$2*$2
  $1=$1+$3
  $2=$2+$3
end           # end
$5=N/K        # $5 := N/K;
while$1<=$5   # while $1<=(N/K):
  $2=$1       #   $1,$0,$2 := (($1*K+$0)*K+$1),($1*K+$0),($1);
  $3=$1*K
  $0=$3+$0
  $1=$0*K
  $1=$1+$2
end           # end
$0=$0*N       # return ($0*N/$1+N);
$0=$0/$1
$0=$0+N
return$0
0