Значение суммы

@metqqq · Регистрация: 15.10.2012

Author24 — интернет-сервис помощи студентам

пользователь вводит целое положительное число N. найти значение суммы
1^(n) + 3^(n-1) + 5^(n-2) + 7^(n-3) + ... + (2*n-3)^2 + (2*n-1)^1
вывести на экран таблицу всех значений суммы которые не выходят за пределы диапазона типа LongInt

вот начал но не знаю как записать формулу:

Pascal

var
i,n:longint;
s:longint;
begin
write('N=');
readln(n);
 //
 for i:= 1 to n do begin
     s := s + тут формула;
     writeln ('Сумма = ',s);
 end;
end.

@CodeR · 15.10.2012, 16:11

Pascal

var
i,n:longint;
s:real;
begin
write('N=');
readln(n);
i:=1;
s:=0;
 While n>=1 do begin
     s:=s+exp(n*ln(i));
     inc(i,2);
     dec(n);
 end;
writeln ('Сумма = ',s);
end.

	15.10.2012, 16:11