Получить последовательность b1, ..., bn

@li_lego · Регистрация: 27.10.2012

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

139 Дано натуральное число n. Получить последовательность b1, ..., bn, где при i = 1, 2, ..., n значение b i равно:
$https://www.cyberforum.ru/cgi-bin/latex.cgi?i\left(\frac{1}{1!}+\frac{1}{2!}+\dots+\frac{1}{i!} \right)$

@CodeR · 08.12.2012, 15:11

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Var B:array[1..20] of real;
    i,n:byte;
    p:real;
Begin
    write('Введите n: ');readln(n);
    p:=1;
    B[1]:=1/p;
    write(B[1]:5:2);
    For i:=2 to n do
    Begin
      p:=p*i;
      B[i]:=B[i-1]+1/p;
      write(B[i]:5:2);
    End;
    readln;
End.

@li_lego · 08.12.2012, 15:59 **[ТС]**

А можно поподробней ?
а то нечего непонятно

@CodeR · 08.12.2012, 16:04

Сообщение от li_lego

А можно поподробней ?
а то нечего непонятно

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Var B:array[1..20] of real;
    i,n:byte;
    p:real;
Begin
    write('Введите n: ');readln(n);
    p:=1;//факториал 
    B[1]:=1/p;//вычисляем первый элемент массва
    write(B[1]:5:2);//выводим его
    For i:=2 to n do //цикл от до N
    Begin
      p:=p*i; //вычилсляем факториал i!
      B[i]:=B[i-1]+1/p; //вычисялем очередной элемент т.е предведующий элемент + 1/i!
      write(B[i]:5:2);//выводим полученный элементв
    End;
    readln;
End.

@li_lego · 08.12.2012, 16:14 **[ТС]**

а ты проверял просто после определенного шага идут одни 1,72

@CodeR · 09.12.2012, 08:09

Сообщение от li_lego

а ты проверял просто после определенного шага идут одни 1,72

всё там меняется просто форматированный вывод я сделал и округляется до 2 знаков после запятой поэтому кажется что не работает, просто факториал быстро растёт и при деление 1 на такое большое число получается очень очень маленькое....

@li_lego · 23.12.2012, 11:03 **[ТС]**

а еще забыл про j перед скобкой это просто один ведь раз умножить на последние что в скобке верно?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

@li_lego 2 / 2 / 2 Регистрация: 27.10.2012 Сообщений: 110

	Получить последовательность b1, ..., bn 08.12.2012, 14:58. Показов 9696. Ответов 6 Метки нет (Все метки) 139 Дано натуральное число n. Получить последовательность b1, ..., bn, где при i = 1, 2, ..., n значение b i равно: $https://www.cyberforum.ru/cgi-bin/latex.cgi?i\left(\frac{1}{1!}+\frac{1}{2!}+\dots+\frac{1}{i!} \right)$ 0

@li_lego 2 / 2 / 2 Регистрация: 27.10.2012 Сообщений: 110
	08.12.2012, 15:59 [ТС]
	А можно поподробней ? а то нечего непонятно 0

@li_lego 2 / 2 / 2 Регистрация: 27.10.2012 Сообщений: 110
	08.12.2012, 16:14 [ТС]
	а ты проверял просто после определенного шага идут одни 1,72 0

@li_lego 2 / 2 / 2 Регистрация: 27.10.2012 Сообщений: 110
	23.12.2012, 11:03 [ТС]
	а еще забыл про j перед скобкой это просто один ведь раз умножить на последние что в скобке верно? 0

Опции темы