Помогите вывести на печать все числа, меньшие 100, не являющиеся числами Фибоначчи.
F_n = F_n-1 + F_n-2
F_0, F_1 = 1
n1:=1;
n2:=1;
n3:=2;
While n3 < 100 Do
Begin
WriteLn(n3);
n1:=n2;
n2:=n3;
n3:=n1+n2
End;
И всего-то...
Гы..помнится как-то видел алгоритм нахождения 48-го числа Фибоначчи рекурсией..комп считал около 700 минут...(о преимуществе рекурсии)
2 Andrey :
...и о преимуществах UpGrade'а :)
viagra farmacias online