Вычисление последовательности. треб. помощь

[POPOV]

Дано задание: вычислить: y = 1 + 2^2 + 3^3 + 4^4 + ... + x^n
Вот пытаюсь делать, получается найти только сумму чисел без учёта степени ). Никак не могу понять как вычислить каждое число в нужной степени.. Длина последовательности (n) вводится с клавиатуры.
Значёк ^ - степень соответственно.
Рассчитываю на любую помощь или подсказку.. что угодно. Благодарю !

[Sazary]

uses crt;
var
i,n,y : longint;

begin
clrscr;
write('Enter n: ');
readln(n);
y:=1;
for i:=2 to n do
 begin
 y := y + round(exp(i*ln(i)));
 end;
writeln('Y= ',y);
readln;
end.

Степень ищется по формуле:
a^n = exp(n*ln(a))
для положительного a

[werser]

y:=1;
for i:=2 to n do
y:=y+exp(i*ln(i));

[werser]

=))) почти успел

[POPOV]

Спасибо большое ) Да, последний вопросик, подскажите как вычислить введённое с клавиатуры число во введённую с клавиатуры степень. Просто хочу эту задачу сделать без той формулы с логарифмом (а то потом это переделывать на php,а что там вместо round, exp, я не знаю), может это мне помогло бы.

[Sazary]

Вот с циклом:

uses crt;
var
i,n,y : longint;

function step(a,st : longint) : longint;
  var k,rez : integer;
  begin
  rez:=1;
  for k:=1 to st do
   rez := rez*a;
  step := rez;
  end;

begin
clrscr;
write('Enter n: ');
readln(n);
y:=1;
for i:=2 to n do
 begin
 {y := y + round(exp(i*ln(i))); }
  y := y + step(i,i);
 end;
writeln('Y= ',y);
readln;
end.

round - просто округляет аргумент и возвращает значение целочисленного типа.
Это нужно, потому что exp() возвращает вещественное значение.
Кстати, в php есть и exp и round

А еще в php есть функция pow, которая возвращает степень:

float pow(float $base, float $exp)

[POPOV]

Спасибо всем огромное ! Щас чё-нибудь мутить буду. А очки репутации тут добавлять можно или они автоматом ?

[Sazary]

А очки репутации тут добавлять можно или они автоматом ?

Не автоматом. Здесь можно оставлять отзывы (слева от сообщения 3 значка. Средний (песочные часы) - оставить отзыв). В зависимости от вашего "веса", человеку добавится сколько-то очков. Насколько знаю, вес становится =1, когда ваша личная репутация достигает 60.
Можете попробовать поискать.

ps Пишу это, потому что сам когда-то интересовался этим вопросом и не смог найти ничего путного..