INPUT"'vvedite N ",n
p=1
FOR i=1 TO n
p=p*i*2/(2*i+1)
NEXT
PRINT p
Похожие записи/страницы:
- Дано натуральное число N. Вычислите произведение первых N сомножителей. P=2/3*4/5*6/7*...*2N/2N+1 - QBasic(Бейсик)
- Произведение N первых нечетных чисел равно k. Сколько сомножителей взято - Basic(Бейсик)
- Произведение N первых нечетных чисел равно k. Сколько сомножителей взято- QBasic(Бейсик)
- Дано натуральное число n. Вычислите сумму первых n слагаемых: 1/3 + 3/9 + 5/27 + 7/81 + ... Все это записано…
- Вычислите первые 20 членов последовательности, а также отношения un/un-1,начиная с n=3 - Basic(Бейсик)
- В одномерном массиве а(10) найти произведение первых n элементов - QBasic(Бейсик)