Определить сумму первых m членов ряда, член ряда с номером n(1,2. )

@SerjoF · Регистрация: 04.06.2014

Здравствуйте, нужна помощь с программой...
Нужно написать программу с помощью цикла, которая определяет сумму первых m членов ряда, член ряда с номером n(1,2,3...) которого определяется выражением: ( х^n / (2n)! ).
Заранее спасибо.

@Puporev · 18.10.2014, 16:58

Pascal

s:=0;
a:=1;
for n:=1 to m do
 begin
  a:=a*x/(2*n);
  s:=s+a
 end;

@bormant · 18.10.2014, 17:08

Puporev,

Pascal

1	a:=ax/(2n-1)/(2*n);

@SerjoF · 18.10.2014, 17:19 **[ТС]**

Взгляните пожалуйста в чём тут ошибка,

Pascal

uses crt;
var
s: real;
n,m,x: integer;
function fact(n : integer) : longint;
begin
 s:=0;
 x:=1;
 for n:=1 to m do
  begin
   x:=(x*n/fact(2*n));
   s:=s+x;
  end;
writeln(s:10:5);
readln;
end;
end.

@bormant · 18.10.2014, 17:25

SerjoF,
в отсутствии тела функции fact().

@SerjoF · 18.10.2014, 17:27 **[ТС]**

А если воспользоваться вашей формулой, то

Pascal

var
s,x: real;
n,m: integer;
begin
 s:=0;
 x:=1;
 for n:=1 to m do
  begin
   x:=(x*n/(2*n-1)/(2*n));
   s:=s+x;
  end;
writeln(s:10:5);
readln;
end.

так будет верно ?

@bormant · 18.10.2014, 18:03

SerjoF,
да, если дописать ввод количества повторов m.
Скобки в 9 строке вокруг всего выражения не нужны, хотя и не мешают.

@SerjoF 1 / 1 / 0 Регистрация: 04.06.2014 Сообщений: 21
		1
	Определить сумму первых m членов ряда, член ряда с номером n(1,2. ) 18.10.2014, 16:35. Показов 1228. Ответов 6 Метки нет (Все метки) Здравствуйте, нужна помощь с программой... Нужно написать программу с помощью цикла, которая определяет сумму первых m членов ряда, член ряда с номером n(1,2,3...) которого определяется выражением: ( х^n / (2n)! ). Заранее спасибо. 0

@bormant Модератор 7519 / 4383 / 2781 Регистрация: 22.11.2013 Сообщений: 12,542 Записей в блоге: 1
	18.10.2014, 17:25	5
	SerjoF, в отсутствии тела функции fact(). 0

@bormant Модератор 7519 / 4383 / 2781 Регистрация: 22.11.2013 Сообщений: 12,542 Записей в блоге: 1
	18.10.2014, 18:03	7
	SerjoF, да, если дописать ввод количества повторов m. Скобки в 9 строке вокруг всего выражения не нужны, хотя и не мешают. 0

Опции темы