... longInt):char;Var st:string[10]; dem,M:longInt;Begin dem:=0; M:=1; Repeat str(M,st); dem := dem+length(st); inc(M); Until dem >= NN; chuso := st[length(st) - (dem - NN)] (* *) BEGIN clrscr;; ... dãysố Fibonaci.N = akFk + ak-1Fk-1 + a1F1Với biểu diễn như trên ta nói N có biểu diễn Fibonaci là akak-1 a2a1.2. Cho trước số tự nhiên N, hãy tìm biểu diễn Fibonaci của ... các số Fibonaci(Dành cho học sinh THCS)Cho số tự nhiên N và dãy số Fibonaci: 1, 1, 2, 3, 5, 8, Bạn hãy viết chơng trình kiểm tra xem N có thể biểu diễn thành tổng của của các sốFibonaci khác...