Найти сумму всех чисел

@passstrada · Регистрация: 10.10.2017

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

Дано натуральное число n и вещественное x . Найти сумму всех чисел

$https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{k{e}^{{sin}^{2}(x+1)}}{k!} , k = 1,...,n .$

@Puporev · 22.11.2017, 11:56

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var n,k:integer;
    x,f,s:real;
begin
write('n=');
readln(n);
write('x=');
readln(x);
f:=1;
s:=0;
for k:=1 to n do
 begin
  f:=f*(k);
  s:=s+k*exp(sqr(sin(x+1)))/f;
 end;
write('s=',s:0:4)
end.

@JuriiMW · 23.11.2017, 09:54

Pascal
1
2
3
4
5
function f(n:Integer):=Range(1,n).Aggregate(1.0,(p,n)->p/n);
begin
  var x:=ReadLnReal('x =');
  Write(Range(1,ReadLnInteger('n =')).Sum(k->k*exp(sqr(sin(x+1)))*f(k)));
end.

@volvo · 23.11.2017, 11:06

Еше вариант:

Pascal
1
2
3
4
begin
  var ex := exp(sqr(sin(ReadlnReal('x =') + 1)));
  writeln('s = ', SeqGen(ReadlnInteger('n =') + 1, (1, 1), v -> (v[0]*v[1], v[1] + 1)).Skip(1).Sum(v -> ex * (v[1] - 1) / v[0]));
end.

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@passstrada 1 / 1 / 0 Регистрация: 10.10.2017 Сообщений: 69

	Найти сумму всех чисел 22.11.2017, 11:37. Показов 1339. Ответов 3 Метки нет (Все метки) Дано натуральное число n и вещественное x . Найти сумму всех чисел $https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{k{e}^{{sin}^{2}(x+1)}}{k!} , k = 1,...,n .$ 1

Найти сумму всех чисел

Решение