結果

問題 No.146 試験監督（1）
コンテスト
ユーザー nobigomu
提出日時 2018-04-24 13:40:16
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 69 ms / 1,000 ms
コード長 1,276 bytes
コンパイル時間 183 ms
コンパイル使用メモリ 5,376 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-27 15:53:56
合計ジャッジ時間 1,062 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 3
権限があれば一括ダウンロードができます

ソースコード

diff # 

local ffi = require 'ffi'
local M = ffi.load 'gmp'

ffi.cdef [[
typedef unsigned long mp_limb_t;
typedef struct {
	int _mp_alloc;
	int _mp_size;
	mp_limb_t * _mp_d;
} __mpz_struct;
typedef __mpz_struct mpz_t[1];
typedef const __mpz_struct * mpz_srcptr;
typedef __mpz_struct * mpz_ptr;

void __gmpz_add(mpz_ptr, mpz_srcptr, mpz_srcptr);
int __gmpz_cmp(mpz_srcptr, mpz_srcptr);
void __gmpz_init(mpz_ptr);
void __gmpz_init_set_d(mpz_ptr, double);
void __gmpz_mod(mpz_ptr, mpz_srcptr, mpz_srcptr);
void __gmpz_mul(mpz_ptr, mpz_srcptr, mpz_srcptr);
void __gmpz_tdiv_qr(mpz_ptr, mpz_ptr, mpz_srcptr, mpz_srcptr);

int __gmp_printf(const char *, ...);
int __gmp_scanf(const char *, ...);
]]

M.__gmp_printf("%Zd\n", (function (f, ct, n)
	local t,c,d,r,one,two,td = ct(),ct(),ct(),ct(),ct(),ct(),ct()
	M.__gmpz_init(t) M.__gmpz_init(c) M.__gmpz_init(d) M.__gmpz_init(r)
	M.__gmpz_init_set_d(one,1) M.__gmpz_init_set_d(two,2) M.__gmpz_init_set_d(td,1000000007)
	for _=1,n do f(t,c,d,r,one,two) end
	M.__gmpz_mod(t,t,td)
	return t
end)(function (t, c, d, r, one, two)
	M.__gmp_scanf("%Zd %Zd\n",c,d)
	M.__gmpz_tdiv_qr(c,r,c,two)
	if M.__gmpz_cmp(r,one)==0 then M.__gmpz_add(c,c,one) end
	M.__gmpz_mul(c,c,d)
	M.__gmpz_add(t,t,c)
end, ffi.typeof("mpz_t"), tonumber(io.stdin:read("*l"))))
0