Viết chương trình tính số hạng thứ n của dãy Fibonacci. Dãy Fibonacci là dãy số gồm các số hạng F(n) vói F(n) = F(n - 1) + F(n - 2) và F(1) = F(2) = 1

1 câu trả lời

uses crt;
var n: longint;
    f: array[1..1000] of longint;

procedure solve();
var i: longint;
begin
    f[1]:=1; f[2]:=1;
    for i:=3 to 1000 do
        f[i]:=f[i - 1] + f[i - 2];
end;

begin
clrscr;
    readln(n);
    solve();
    writeln(f[n]);
readln;
end.

Câu hỏi trong lớp Xem thêm