Вычислить N - первых членов последовательности, их сумму и среднее арифметическое.

@Felixrx · Регистрация: 25.10.2021

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

Числовая последовательность задана формулой Ai= I^2+2i+3/3i+4 Вычислить N - первых членов этой последовательности их сумму и среднее арифметическое.

Добавлено через 5 минут
Сразу спасибо кто откликнулся и помог

@January29 · 26.10.2021, 23:34

Felixrx, Если я правильно понял. Пробуйте

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Module Module1
    ' Числова последовательность задана формулой Ai= I^2+2i+3/3i+4
    ' Вычислить N - первых членов этой последовательности их сумму и среднее арифметическое.
    Dim N As Integer, A As Double, sum As Double = 0
    Sub Main()
        Console.Write("N = ")
        N = Console.ReadLine()
        For i = 1 To N
            A = i ^ 2 + 2 * i + 3 / 3 * i + 4
            Sum += A
        Next
        Console.WriteLine("N=" & N & vbNewLine & "Сумма " & sum & vbNewLine & "Среднее арифметическое " & sum / N)
        Console.ReadLine()
    End Sub
End Module

@A_Qz · 02.11.2021, 09:26

Небольшое замечание.
В коде January29, в строке 9 знаменатель правильнее взять в скобки:

VB.NET
1
 A = i ^ 2 + 2 * i + 3 / (3 * i) + 4

После простых преобразований код может выглядеть так:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Module Module1
    ' Числова последовательность задана формулой Ai= I^2+2i+3/3i+4
    ' Вычислить N - первых членов этой последовательности их сумму и среднее арифметическое.
    Dim N As Integer, A As Double, sum As Double = 0
    Sub Main()
        Console.Write("N = ")
        N = Console.ReadLine()
        For i = 1 To N
            Sum += i*(i+2)+1/i
        Next
        Sum +=4*N
        Console.WriteLine("N=" & N & vbNewLine & "Сумма " & sum & vbNewLine & "Среднее арифметическое " & sum / N)
        Console.ReadLine()
    End Sub
End Module

В результате исчезло возведение в степень, уменьшилось число умножений - повысилось быстродействие.

Новые блоги и статьи Все статьи Все блоги /
Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита, которое может. . .	Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip

@Felixrx 0 / 0 / 0 Регистрация: 25.10.2021 Сообщений: 33

	Вычислить N - первых членов последовательности, их сумму и среднее арифметическое. 26.10.2021, 21:43. Показов 1850. Ответов 2 Метки нет (Все метки) Числовая последовательность задана формулой Ai= I^2+2i+3/3i+4 Вычислить N - первых членов этой последовательности их сумму и среднее арифметическое. Добавлено через 5 минут Сразу спасибо кто откликнулся и помог 0

Вычислить N - первых членов последовательности, их сумму и среднее арифметическое.

Решение