Последние цифры суммы, Сумма вида 1^1+2^2+3^3+... Опции

[Анна М.]

Есть задача:

Выражение 1^1+2^2+3^3+...+10^10=10405071317.
Требуется найти последние 10 цифр выражения 1^1+2^2+3^3+...+1000^1000.

Решить задачу я смогу, я уверена.)) Однако подскажите принцип решения, за что браться и с чего начинать? А то до самой всё никак не доходит.
Заранее благодарю.

Сообщение отредактировано: Анна М. - 29.04.2006 18:24

[zZz]

а я вот чего придумал... только вот компилировать прога всё это дело упорно отказывается, а MOD убирать нельзя, иначе переполнение пойдет... пробовал применять extended для описания переменных, так он(паскаль) у меня даже с таким типом не знаком, пришел к выводу, что мой паскаль - полный отстой... ну все же принцип таков, может у кого при небольшой редакции пойдет...

var x,a,i,s:integer;
begin
s:=0;
for x:=1 to 1000 do
begin
a:=1;
for i:=1 to x do
a:=((a*x) mod 10000000000);
s:=((s+a) mod 10000000000);
end;
write(s);
end.

Сообщение отредактировано: zZz - 2.05.2006 19:54