Написать программу для нахождения значения переменной S по формуле: S=ln1+ln2+…+ln n
Написать программу для
нахождения значения переменной S по формуле: S=ln1+ln2+…+ln n
Гость
Ответ(ы) на вопрос:
ГостьА в чем трудность?
Dim i As Integer, S As Double, n As Integer
Print "Введите количество слагаемых n: ";
Input n
S = 0
For i = 1 To n
S = S + Log(i)
Next i
Print "Сумма S = " & Str(S)
End
Не нашли ответ?
Похожие вопросы