Bài 94/2002 - Biểu diễn tổng số Fibonaci (Dành cho học sinh THCS) Cách giải: Ta tìm số Fibonacci gần với số N Đây số hạng nằm dãy kết Sau đó, lấy hiệu số N số Fibonacci gần với số N nhất, tiếp tục tìm số Fib gần với hiệu hiệu số Fib Kết số Fibonacci liệt kê theo thứ tự từ lớn đến nhỏ Chương trình: Program BdFib;{Bai 94/2002: Bieu dien tong cac so Fibonacci} uses crt; var n:longint; f:array[1 1000] of longint; function fib(k:integer): longint; begin f[1]:=1; f[2]:=1; f[3]:=2; if f[k]=-1 then f[k]:=fib(k-1)+fib(k-2); fib:=f[k]; end; procedure xuly; var i,j:longint; begin for i:=1 to 1000 f[i]:=-1; while n>0 begin i:=1; while fib(i)