Вычислить выражение 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д