結果

問題 No.16 累乗の加算
コンテスト
ユーザー 826814741_6
提出日時 2018-12-26 17:21:04
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 3 ms / 5,000 ms
コード長 316 bytes
コンパイル時間 117 ms
コンパイル使用メモリ 6,684 KB
実行使用メモリ 6,820 KB
最終ジャッジ日時 2024-10-01 14:44:26
合計ジャッジ時間 676 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 14
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

print((function (f, fh, m)
	local x,r = fh:read("*n"),0ULL
	for _=1,fh:read("*n") do r=r+f(x,fh:read("*n"),m) end
	return tostring(r%m):sub(1,-4)
end)(function (x, n, m)
	local ba,rs,r = bit.band,bit.rshift,1ULL
	while n~=0 do r,x,n=ba(n,1)~=0 and r*x%m or r,x*x%m,rs(n,1) end
	return r%m
end, io.stdin, 1000003ULL))
0