Помощь - Поиск - Пользователи - Календарь
Полная версия: паскаль рекурсивные алгоритмы СРОЧНО
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Solana
1. вычеслить сумму n первых членов арифметической прогрессии
2. написать рекурсию вычесления N(ого) числа фибоначи
3. найти сумму цифр в числе
все задачи надо черес рекурсии с процедурами или с функциями
я понимаю что могла бы и сама решить эти задачи но я не могу понять рекурсии
надеюсь с помощью вас пойму
зарание спасибо
pascal65536
Самый часто встречающийся пример - нахождение n!. Во всех книжках пишут.
Работает рекурсия до тех пор, пока однозначно не определится самое маленькое значение, когда и вычислять то ничего не надо. В этом примере вычисление факториала будет упрощаться до тех пор, пока не надо будет вычислить 1! = 1. Это очевидно. Затем рекурсия начнёт подъём, вычисляя 2! как 2*1!, 3!=3*2! и т.д.

Var C : Integer;

Function F(A:Integer):Integer;
Begin
If A = 1 Then F := 1
Else F := A * F(A-1);
End;

Begin
C := 7;
WriteLn(F©);
End.


А теперь внимание! Решение первой задачи перед вами! Надо только изменить лишь один символ!
Solana
не не поняла
не получается
напиши нормально
pascal65536
Надо заменить только один символ!
klem4
Solana, приказывать будешь в другом месте и явно при других обстоятельствах. Все задачи решались, используй поиск.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.