Лекция: ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ
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, вычисляющую величину xn следующим образом:
5. Напишите рекурсивную процедуру, при выполнении которой на экран будет выводиться отрезок натурального ряда чисел.
6. Напишите программу вычисления первого числа Фибоначчи, большего m (m>1), включающую рекурсивную функцию, которая основана на непосредственном использовании соотношения un=un-1+un-2.
7. Числа Фибоначчи второго порядка u0, u1, u2,… определяются следующим образом:
Напишите программу вычисления un для данного неотрицательного целого 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 ЦЕЛЬ РАБОТЫ
Познакомиться с понятиями “массивы», закрепить практические навыки работы с одномерными и многомерными массивами