Задать вопрос
7 июня, 06:29

Составить в VBA, используя подпрограмму:

Составить программу вычисления суммы: 1! + 2!+3! + ... + n!

+2
Ответы (1)
  1. 7 июня, 08:24
    0
    Function fact (n As Integer) As Long

    Dim i As Integer, p As Long

    p = 1

    For i = 2 To n

    p = p * i

    Next i

    fact = p

    End Function

    Sub Test ()

    Dim n As Integer, s As Long, i As Integer

    s = 0

    n = CInt (InputBox ("Введите число n"))

    For i = 1 To n

    s = s + fact (i)

    Next i

    MsgBox s

    End Sub
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить в VBA, используя подпрограмму: Составить программу вычисления суммы: 1! + 2!+3! + ... + n! ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Написать в VBA через подпрограмму: Написать программу вычисления суммы факториалов всех нечетных чисел от 1 до 9.
Ответы (1)
Разработать подпрограмму, которая в качестве аргумента получает целое число и проверяет, является ли оно простым. Используя подпрограмму вывести на экран все простые числа из промежутка целых чисел, определенного пользователем. Pascal ABC
Ответы (1)
1. Напишите программу вычисления расстояния между двумя точками плоскости. 2. Напишите программу вычисления площади боковой поверхности куба. 3. Напишите программу вычисления площади и гипотенузы прямого треугольника, если известны его катеты. 4.
Ответы (1)
Написать в VBA, используя подпрограмму: Натуральное число, в записи которого n цифр, называется числом Амстронга, если сумма его цифр, возведенных в степень n равна самому числу. Найти все эти числа от 1 до k.
Ответы (1)
Даны основания и высоты двух трапеций. Составьте программу для вычисления суммы их площадей. Используйте подпрограмму вычисления площади одной трапеции. а=2, в=3, h=2.5 а=4.1, в=5, h=3.3
Ответы (1)