Lib.nbdp.net
首页
试卷列表
OJ题库
搜索
登录
主页
题库
详解
不是VIP会员,不能显示答案
题目解答
题目:
const c = 2009;
var n, p, s, i, j, t: integer;
begin
read(n, p); s := 0; t := 1;
for i := 1 to n do begin
t := t * p mod c;
for j := 1 to i do s := (s + t) mod c;
end;
writeln(s);
end.
输入:11 2
输出:
782
考点:
分析:
解答:
评论:
老师: