Помощь - Поиск - Пользователи - Календарь
Полная версия: Числа Фибоначчи
Форум «Всё о Паскале» > Pascal, Object Pascal > Теоретические вопросы
123
Помогите вывести на печать все числа, меньшие 100, не являющиеся числами Фибоначчи.
mj
Цитата
Помогите вывести на печать все числа, меньшие 100, не являющиеся числами Фибоначчи.

Что то очень знакомое, но всё же напомните что такое числа Фибоначчи...
___ALex___
F_n = F_n-1 + F_n-2
F_0, F_1 = 1
BlackShadow
n1:=1;
n2:=1;
n3:=2;
While n3 < 100 Do
Begin
 WriteLn(n3);
 n1:=n2;
 n2:=n3;
 n3:=n1+n2
End;

И всего-то...
Andrey
Гы..помнится как-то видел алгоритм нахождения 48-го числа Фибоначчи рекурсией..комп считал около 700 минут...(о преимуществе рекурсии)
BlackShadow
2 Andrey :
 ...и о преимуществах UpGrade'а  :)
generic finasteride internationa
viagra farmacias online
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.