Рекурсия - 16 стр.

UptoLike

18
Например, дерево рекурсивных вызовов для вызова Fib (7) будет иметь
следующий вид:
Из рисунка видно, что, Fib(5) вычисляется дважды, Fib(4) – трижды,
Fib(3) – 5 раз и т.д. То есть количество повторных вызовов представляет собой
также последовательность чисел Фибоначчи!
Пример 5 Выдать цифры заданного натурального числа в порядке их сле-
дования (слева направо).
program Rec_5;
var n: integer;
procedure Digit_rec(n: integer);
begin
if n div 10 <> 0 then
begin
Digit_rec(n div 10)
write(n mod 10,' ');
end
else writeln(n mod 10)
end;