Visual Basic

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

Войти

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

Рейтинг 4.67/6:

OverloaD

0 / 0 / 0

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

Сообщений: 63

Сумма членов арифметической прогресии

20.11.2010, 14:35. Показов 1104. Ответов 1

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

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

Visual Basic
1
2
3
4
5
6
7
Private Sub Command1_Click()
n = 3
d = 5
a = 5
s = (2 * a + d * (n - 1) / 2) * n
Text1.Text = s
End Sub

пишу так, а оно неправильный результат дает! найдите ошибку, и помогите )

Programming

Эксперт

39485 / 9562 / 3019

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

Сообщений: 41,671

Блог

20.11.2010, 14:35

Ответы с готовыми решениями:

Найти n член арифметической прогресии, используя рекурсию
Помогите пожалуйста составить программу с рекурсией, которая будет находить нужный нам член арифметической прогрессии. Public Function...

Сколько нужно взять членов арифметической прогрессии с заданым первым членом и разностью чтоб их сумма превыси
Сколько нужно взять членов арифметической прогрессии с заданым первым членом и разностью чтоб их сумма превысила заданое число q. Често...

Определить количество членов арифметической прогрессии
Привет ребята:* Учусь на менеджменте, в компьютерах вообще никогда не разбиралась( а тут началось программирование на VB 6.0., очень уж...

YuraAAA

1605 / 1337 / 291

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

Сообщений: 3,487

Записей в блоге: 2

20.11.2010, 15:18

Скобок не хватает

Visual Basic
1
s = ((2 * a + d * (n - 1)) / 2) * n

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

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

Сообщений: 28,500

Блог

20.11.2010, 15:18

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

Сколько нужно взять членов арифметической прогрессии
Сколько нужно взять членов арифметической прогрессии с заданными первым членом и разностью, чтоб их сумма превысила заданное число q

Найти разность и сумму первых n членов арифметической прогрессии
Здравствуйте!!! :gwink:. Известны первый член а1 арифметической прогрессии и последний член аn. Найти разность d и сумму Sn первых n членов...

Вычисление и вывод членов арифметической прогрессии
Вычислять и выводить в ячейки рабочего листа члены арифметической прогрессии до тех пор, пока очередной член прогрессии не окажется большим...

Вычислить сумму 10 первых членов арифметической прогрессии
1 .Вычислить сумму десяти первых членов арифметической прогрессии: а1 = 1; d = 4; an = an–1 + d; Sn = Sn-1 + an.

Вычислить сумму десяти первых членов арифметической прогрессии
Ребята подскажите плиз, как правильно написать программу из задачи для VBA Вычислить сумму десяти первых членов арифметической...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .

Наверх