Вычислить выражение p=a*(a-n)*(a-2*n)*...*(a-n2) - VB
Формулировка задачи:
Даны действительное число a, натуральное число n. Вычислить:
p=a*(a-n)*(a-2*n)*...*(a-n2)
Ответ нужен на языке Basic
Заранее спасибо
Решение задачи: «Вычислить выражение p=a*(a-n)*(a-2*n)*...*(a-n2)»
textual
Листинг программы
- Function p#(a#, n&)
- Dim i#
- p = a
- For i = n To n * n Step n
- p = p * (a - i)
- Next
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
