Em được cho trước số nguyên dương n, hai số nguyên dương a, m. Hãy xác định dãy w1, w2, …, wn theo công thức:
wi = ai mod m + 1
Tính tổng của dãy số này.
Input: 3 số n, a, m
Output: tổng dãy số
Input Output
5 4 9 28
Giải thích: dãy số tạo được là: 5, 8, 2, 5, 8.
Uses crt;
Trả lờiXóaVar n,a,m,i,j,tong:longint;
w:array[1..10000] of longint;
Begin
readln(n);
readln(a);
readln(m);
For i:=1 to n do
Begin
w[i]:=1;
For j:=1 to i do
w[i]:=w[i]*a;
w[i]:=(w[i] mod m)+1;
tong:=tong+w[i];
end;
Write(tong);
readln;
end.
program p;
Trả lờiXóauses crt;
var t,a,i,m,n,j:longint;
w:array[1..100] of word;
begin
clrscr;
readln(n); readln(a,m);
for i:=1 to n do
begin
w[i]:=1;
for j:=1 to i do
w[i]:=a*i;
w[i]:=(w[i] mod m)+1;
t:=t+w[i];
end;
write(t-1);
readln;
end.