結果

問題 No.146 試験監督（1）
コンテスト
ユーザー nobigomu
提出日時 2018-04-26 18:17:00
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 68 ms / 1,000 ms
コード長 1,224 bytes
コンパイル時間 108 ms
コンパイル使用メモリ 5,248 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-27 21:12:58
合計ジャッジ時間 903 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
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_init(mpz_ptr);
void __gmpz_init_set_d(mpz_ptr, double);
void __gmpz_add(mpz_ptr, mpz_srcptr, mpz_srcptr);
int __gmpz_cmp(mpz_srcptr, mpz_srcptr);
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, g, n)
	local t,c,d,r,one,two,td = f(),f(),f(),f(),f(1),f(2),f(1000000007)
	for _=1,n do g(t,c,d,r,one,two) end
	M.__gmpz_mod(t,t,td)
	return t
end)(function (n)
	local cd = ffi.new("mpz_t")
	if n~=nil then M.__gmpz_init_set_d(cd,n) else M.__gmpz_init(cd) end
	return cd
end , function (t, c, d, r, one, two)
	M.__gmp_scanf("%Zd %Zd",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, tonumber(io.stdin:read("*l"))))
0