1002 - Послідовність Фібоначчі
оригінал завдання див тут
Завдання
Послідовність фібоначчі визначається наступним чином:
a_(0)=0;
a_(1)=1;
a_(k)=a_(k-1) + a_(k-2), тобто а0=0;
a1=1;
a2=1+0+1;
a3=1+1=2;
a4=2+1=3;
a5=3+2=5;
a6=5+3=8;
a7=8+5=13;
a8=13+8=21
Для заданого n знайти значення n-го елемента послідовності Фібоначчі (an).
Вхідні дані
В єдиному рядку записане єдине число N (1 <= N <= 40).
Вихідні дані
Єдине число - відповідь.
Приклад введення 1
1
Приклад виведення 1
1
Приклад введення 2
5
Приклад виведення 2
5
Приклад введення 3
8
Приклад виведення 3
21
Розвязання
program poslidovnist_fibonachi;
var a0,a1,an,i,n:integer;
begin
a0:=0; a1:=1;
readln(n);
for i:=2 to n do begin
an:=a0+a1; a0:=a1; a1:=an;
end;
writeln(an);
end.
| 