ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ

1. Дано натуральное число n. Вычислите (2n)! и 2n!; при этом используйте рекурсивную функцию вычисления факториала.

2. Переделайте программу Fib.vbs, так чтобы она находила к-й член последовательности Фибоначчи, но последовательность начиналась бы не с 1, а с 0:

0, 1, 1, 2, 3, 5, 8, 13, 21, ...

3. Проверьте, будет ли к-й член последовательности Фибоначчи делиться на 5.

4. Опишите рекурсивную функцию Stepen(x,n), формальными параметрами которой являются вещественная переменная x и натуральная переменная n, вычисляющую величину xⁿ следующим образом:

5. Напишите рекурсивную процедуру, при выполнении которой на экран будет выводиться отрезок натурального ряда чисел.

6. Напишите программу вычисления первого числа Фибоначчи, большего m (m>1), включающую рекурсивную функцию, которая основана на непосредственном использовании соотношения u_n=u_n-1+u_n-2.

7. Числа Фибоначчи второго порядка u₀, u₁, u₂,... определяются следующим образом:

Напишите программу вычисления u_n для данного неотрицательного целого n. Используйте рекурсивную функцию.

8. Вычислите, используя рекурсию:

9. Опишите семантику приведённой ниже программы:

Function koren(i)

If i=0 Then

koren=sqr(11)

Else

koren=sqr(11-2*sqr(11+2*sqr(11-2*koren(i-1))))

End If

End Function

Dim n,k,i

i=CInt(InputBox("Введите количество рекурсий", "Ввод параметров","1"))

msgbox "Результат: "&koren(i)

ЛАБОРАТОРНАЯ РАБОТА 6.
МАССИВЫ

6.1 ЦЕЛЬ РАБОТЫ

Познакомиться с понятиями "массивы", закрепить практические навыки работы с одномерными и многомерными массивами