VBA

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
VBA Сделать простую задачу VBA https://www.cyberforum.ru/ vba/ thread2268887.html Помогите пожалуйста	VBA Помогите найти ошибку, почему программа не может выдать Smax? Помогите найти ошибку, почему программа не может выдать Smax? Причем S1, S2 она выводит, а на Smax замолкает. P(i)- рандомный массив. Как сделать это без функций, я знаю, а вот через функции я не могу понять где ошибаюсь. Sub Prog() Dim i, S1, S2, a, b As Integer Call one(1, 14) Call two(5, 14) Call three(S1, S2)
VBA Дана запись, состоящая из ведомости 3-х студентов с их оценками https://www.cyberforum.ru/ vba/ thread2268861.html Дана запись, состоящая из ведомости 3-х студентов с их оценками (порядковый номер, Ф.И.О. и три оценки) определить количество отличников и средний бал каждого студента	VBA Транспонирование пар значений Вба-гуру, помогите пжл с вопросом: Есть данные в формате 35 2250,00 8 225 9 902 10 842 11 281 120 67,00 5 12 7 15 8 15 9 25 120 3,00 4 3 Данные в столбце 3 и далее представлены парами: 8-255, 9-902, 10-842 и так далее. Количество пар в строках разное. Требуется транспонировать пары, чтобы на выходе было так: 35 2250,00 8 225 9 902 https://www.cyberforum.ru/ vba/ thread2268602.html
Проверка совпадения имени листа с именем из таблицы VBA Здравствуйте. Есть задача, в которой необходимо сравнить данные из таблицы с данными из справочников. Есть 7 брендов, из которых 6 известны, и лишь 5 содержатся в справочниках. Необходима проверка на наличие листа с наименованием бренда в книге справочника. Если исключить бренд "G-Nor", то программа работает верно, однако данный вариант "решения" проблемы не годится. Если сделать проверку как у...	VBA Разбивка программы на функции Народ, нужна помощь, написал программу, а мне сказали разбить её на 3 функции, т.е. чтобы при запуске программы последовательно выполнялись 3 блока: 1)расчёта S1 2)расчёта S2 и 3) их сравнение и вывод результата на экран. Никак не могу понять, как разбить на эти самые блоки (они же - функции). Помогите, кто сможет. Заранее спасибо! Sub Prog6() Dim B(14) As Integer Dim i, S1, S2... https://www.cyberforum.ru/ vba/ thread2268388.html
VBA Интеграция бота в Ворде https://www.cyberforum.ru/ vba/ thread2268357.html здравствуйте, кто-то делал что-то подобное? ну типа выделил нужный текст, прога спросила, что хочу? в зависимости от ответа юзера делала заложенные в коде возможности, поделитесь кодом, спс	С помощью каких компонентов реализовать двумерный массив? VBA Подскажите с помощью каких компонентов реализовать(для одномерного edit, а для двумерного что). Я не особо знаю все компоненты VBA.
VBA Поиск в Word-е на нужной странице здравствуйте, как в Ворде узнать начало и конец выделенного текста на какой странице? если получили ответ начало 2, конец 3 и организовать на одну выше выделенной страницы нужного текста, то есть в данном случае на 1-й? спс https://www.cyberforum.ru/ vba/ thread2268288.html	VBA Удалить строку по двум условиям https://www.cyberforum.ru/ vba/ thread2268207.html Добрый день. Нужна помощь. Сам я с vba почти никак. Перерыл весь инет но не нашел как сделать. Есть прайс, начинаеся со строки категория товара. Ниже в несколько колонок артикул, название, количество и цена. Ниже следующая категория и тоже товар и так далее. Проблема в следующем, прайс большой и периодически количество товара меняется. На некоторых позициях нет цены. Строки без цены нужно...
VBA Полоса прокрутки внутри ячейки Добрый день! Подскажите, как внедрить полосу вертикальной прокрутки в группу ячеек, содержащих очень много текста	VBA Интеграция таблицы Excel c Google контактами Добрый день, форумчане! Соскучились?) :) Встал вопрос, каким образом создавать гугл контакты из таблицы Excel. Прошу Вашей помощи https://www.cyberforum.ru/ vba/ thread2267966.html

Dan1l10

0 / 0 / 0

Регистрация: 25.06.2018

Сообщений: 5

26.06.2018, 07:17 [ТС]

Excel

Доказать сходимость ряда (простая задача) - VBA - Ответ 12502992

26.06.2018, 07:17. Показов 2063. Ответов 8

Метки (Все метки)

Ответ

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

Не по теме:

вот это убивает наповал!
Мозгов определить сложность задания хватило?
Что ж тогда не делаешь сам?

требует твоего начала! Сначала покажи свои попытки, а потом проси помощи!

Visual Basic

Sub prog()
Dim s As Single, s1 As Single, s2 As Single, k As Integer
s = 0
k = 1
s2 = 0
s1 = 1 / (k * (k + 1))
Do While Abs(s2-s1) > 10 ^ (-4)
k = k + 1
s2 = s1
s = s + s1
s1 = 1 / (k * (k + 1))
Loop
MsgBox "s=" & Str(s)
End Sub

Добавлено через 30 минут

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

Dan1l10, выдает 0.99 значение суммы (стремится к единице) и это правильно. а вот очередной член ряда
d = 1/k/(k+1) становится меньше заданной точности. Так что вы просто перепутали сумму и точность расчёта. Всё у вас считает, видимо , правильно

Добавлено через 11 минут
Dan1l10, написал ваш макрос, можете проверить. Точность можно, для интереса, менять

Visual Basic

Sub proba()
k = 1
Do
  d = 1# / k: k = k + 1: d = d / k: s = s + d
Loop While d > 10 ^ -4
MsgBox "s=" & s & "  d=" & d & "  k=" & k
End Sub

Добавлено через 20 минут
как верно сказал Казанский d стремится к нулю это необходимое условие сходимости ряда, но недостаточное. Но ваш ряд сходящийся, т.к. сходится ряд 1/k², а все члены вашего ряда меньше членов этого ряда.

Спасибо большое

s выдает 0,9900995, как сделать 0, 999...?

Добавлено через 1 час 5 минут
Добавил

Visual Basic

1	Dim k, d As Single, s As Currency

Добавлено через 1 минуту
Всем спасибо, проблема решена

Вернуться к обсуждению:
Доказать сходимость ряда (простая задача) VBA

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

26.06.2018, 07:17

Готовые ответы и решения:

Доказать, что из сходимости одного ряда следует сходимость другого ряда
Пусть дана положительная последовательность {{c}_{n}}. Необходимо доказать, что из сходимости ряда...

Доказать сходимость ряда
Как доказать сходимость и найти сумму ? расскажите

Доказать сходимость ряда
Ребят помогите решить. Требуется доказать сходимость Ʃ n2 /2n

Доказать сходимость ряда
Добрый вечер. Подскажите, как доказать, что ряд 1/(n*log2(2n+1)) сходится?

	26.06.2018, 07:17

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

26.06.2018, 07:17

Помогаю со студенческими работами здесь

Доказать сходимость ряда
Расскажите, пожалуйста, как можно более подробно, как тут доказать сходимость?

Опечатка? Доказать сходимость ряда
Пользуясь интегральным признаком Коши доказать сходимость ряда: \sum_{n=1}^{\infty }...

Доказать сходимость ряда по признаку Вейерштрасса
Построив мажорирующий ряд доказать равномерную сходимость данного ряда в указанном промежутке ...

Доказать по критерию Коши сходимость ряда
Доказать по критерию Коши сходимость \sum_{k=1}^{n} 1/nln^2n

Доказать равномерную сходимость функционального ряда
Доказать равномерную сходимость функционального ряда при x ∈ (-беск., +беск)

Доказать сходимость ряда и найти его сумму
∞ n ∑ _______ n=1 1+n^2

Наверх