Вычисление суммы ряда

@Чуда · Регистрация: 23.02.2010

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

помогите пожалуйста! задание такое: используя циклические алгоритмы составить программу для вычисления суммы членов ряда 1)An=3*n*x/(n+2)! 2)An=2*x*n!/(2n)!

@System.exe · 23.02.2010, 22:04

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Var An1, An2,x:real;
i,j:integer;
function fact(n:integer):real;
begin
if n>0 then fact:=n*fact(n-1);
else fact:=1
end;
begin
An1:=0;
An2:=0;
writeln('vvedite kol-vo slagaemix -j and x');
readln(j,x);
for i:=1 to j do
begin
An1:=An1+3*i*(x/fact(i+2));
An2:=An2+2*x*(fact(i)/fact(2*i))
end;
writeln('An1=', An1:6:3);
writeln('An2=', An2:6:3)
end.

@Puporev · 24.02.2010, 08:17

Циклы без функции факториал.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
uses crt;
var x,s,f:real;
    n,i,j:integer;
begin
clrscr;
write('x=');
readln(x);
write('n=');
readln(n);
writeln('An=3nx/(n+2)!');
s:=0;
for i:=1 to n do
 begin
  f:=1;
  for j:=1 to i+2 do
  f:=f/j;
  s:=s+3*i*x*f;
 end;
writeln('Сумма=',s:0:5);
writeln;
writeln('An=2xn!/(2n)!');
s:=0;
for i:=1 to n do
 begin
  f:=1;
  for j:=1 to i do
  f:=f*j/(2*j*(2*j-1));
  s:=s+2*x*f;
 end;
writeln('Сумма=',s:0:5);
readln
end.

Новые блоги и статьи Все статьи Все блоги /
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/

@Чуда 0 / 0 / 0 Регистрация: 23.02.2010 Сообщений: 14

	Вычисление суммы ряда 23.02.2010, 18:07. Показов 1275. Ответов 2 Метки нет (Все метки) помогите пожалуйста! задание такое: используя циклические алгоритмы составить программу для вычисления суммы членов ряда 1)An=3nx/(n+2)! 2)An=2xn!/(2n)! 0

Вычисление суммы ряда

Решение