задача со степенью

[trexx]

S:=1(в степени 1)+2(в степени 2)+3(в степени 3)...+n(в степени n)


срочно задачка нужна, заранее благодарен если можно задачку полностью напишите

[Sheka]

x в степени n = exp(n*ln(x));

пусть накажут меня модераторы, но вам с такими требованиями во ФРИЛАНС!

[samec2011]

Стучите в асю 11один11-5шесть5шесть, обсудим.

[trexx]

все) я решил


program pr1;
var i,s,n:integer;
function f(i:integer):longint;
var c:longint;
var j:integer;
begin
c:=1;
for j:=1 to i do
c:=c*j;
f:=c;
end;
begin
writeln('vvedi chislo');
readln(n);
for i:=1 to n do
s:=s+f(i);
writeln(s);
end.

[airyashov]

помоему тебя обманули, то что ты считаешь это факториал

Код: Выделить всё

for j:=1 to i do
c:=c*[B]i[/B];

[Хыиуду]

function f(i:integer):longint;
var c:longint;
var j:integer;
begin
c:=1;
for j:=1 to i do
c:=c*j;
f:=c;
end;
Я фанат короткого кода

Код: Выделить всё

function f(i:integer):longint;
var j:integer;
begin
f:=1;
for j:=1 to i do
f:=f*j;
end;