ru.algorithms
- RU.ALGORITHMS ----------------------------------------------------------------
From : Vovanius Uryvaeff 2:5020/400 23 Apr 2002 18:48:00
To : Borodin Anatoly
Subject : Re: Фибоначчи
--------------------------------------------------------------------------------
Sat Apr 20 2002 02:38, Borodin Anatoly wrote to All:
BA> From: Borodin Anatoly <fractal@viii.ntu-kpi.kiev.ua>
BA> Hi!
>>> Еще одно решение:
BA> a:=1;
BA> b:=1;
BA> for i:=1 to n-2 do begin
BA> a:=a+b;
BA> b:=a-b;
BA> end;
и еще одно решение:
i := n
a := 0; b := 1; c := 1
a1 := 0; b1 := 1; c1 := 1
while i>0
if i mod 2 = 1
a2 = a*a1+b*b1
b2 = a*b1+b*c1
c2 = b*b1+c*c1
a1 = a2
b1 = b2
c1 = c2
i = i-1
end if
a2 = a*a+b*b
b2 = a*b+b*c
c2 = b*b+c*c
a = a2
b = b2
c = c2
i = i/2
end while
result = a2
он считает наиболее быстро. как то что то здесь уже пролетало
...сижу тут, никого не трогаю, примус починяю...
--- ifmail v.2.15dev5
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
