Вычислить выражение 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

ИИ для рефератов и докладов

  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

9   голосов , оценка 4.111 из 5