Вычислить значение суммы при заданном значении аргумента

@Artem557 · Регистрация: 13.01.2016

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

дан x, посчитать y

$https://www.cyberforum.ru/cgi-bin/latex.cgi?y=\sum_{n=1}^{10}\left[\left(\frac{1}{x} \right)^{2n+1}\cdot n! \right]$

@Puporev · 08.03.2016, 15:07

Pascal

var n:integer;
    x,t,z,f,y:real;
begin
write('x=');
readln(x);
if x=0 then
 begin
  write('y не определено, деление на 0');
  readln;
  exit;
 end;
z:=1/x;
t:=z;
y:=0;
for n:=1 to 10 do
 begin
  t:=t*z*z*n;
  y:=y+t;
 end;
write('y=',y:0:5);
readln
end.

@Artem557 0 / 0 / 1 Регистрация: 13.01.2016 Сообщений: 22
		1
	Вычислить значение суммы при заданном значении аргумента 08.03.2016, 11:03. Показов 1276. Ответов 1 Метки нет (Все метки) дан x, посчитать y $https://www.cyberforum.ru/cgi-bin/latex.cgi?y=\sum_{n=1}^{10}\left[\left(\frac{1}{x} \right)^{2n+1}\cdot n! \right]$ 0

Опции темы

Вычислить значение суммы при заданном значении аргумента

Решение