• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>

            ArcTan

            dfs
            隨筆 - 16, 文章 - 117, 評論 - 6, 引用 - 0
            數據加載中……

            ural 1133 (fibonacci數列)

            http://acm.timus.ru/problem.aspx?space=1&num=1133

            題目大意:給定i Fi,j,Fj,n.求Fn。
            滿足:Fi+2=Fi+1+Fi;

            應該說是水題一個哇:
                  Fi+k = gk * Fi + gk-1 * Fi-1。其中g是1 1 開頭的fibonacci數。

            C/C++的long long double都過不了。pascal的extended過了。怎么回事呢??

            Pascal代碼:
            Var
                    i
            ,j,k,p,n,tmp:longint;
                    F:array[-1001..1001] of extended;
                    g:array[0..2002] of extended;
                    temp,ti,tj:extended;

            begin
                    readln(i
            ,ti,j,tj,n);
                    F[i]:=ti;F[j]:=tj;
                    if (i>j) then
                    begin
                            tmp:
            =i;i:=j;j:=tmp;
                            F[i]:=tj;F[j]:=ti;
                    end;
                    k:=j-i;
                    g[0]:=1;g[1]:=1;
                    for p:=2 to k do
                            g
            [p]:=g[p-1]+g[p-2];

                    F
            [i-1]:=trunc((F[j]-F[i]*g[k])/g[k-1]);

                    if n>i then
                    begin
                            k:
            =i+1;
                            while k<=n do
                            begin
                                    F
            [k]:=F[k-1]+F[k-2];
                                    inc(k);
                            end;
                    end;
                    if n<i-1 then
                    begin
                            k:
            =i-2;
                            while k>=n do
                            begin
                                    F
            [k]:=F[k+2]-F[k+1];
                                    dec(k);
                            end;
                    end;
                    writeln(F[n]:0:0);
                    readln;
            end.


            昨天真是被這個題目虐慘了啊!!!!!!
            尼瑪,我們真是弱爆了!

            posted on 2012-05-07 16:47 wangs 閱讀(291) 評論(0)  編輯 收藏 引用 所屬分類: ACM-數學

            久久这里只有精品18| 欧美色综合久久久久久| 伊人久久国产免费观看视频| 久久综合综合久久97色| 久久99国产综合精品免费| 色偷偷偷久久伊人大杳蕉| 亚洲AV无码久久精品狠狠爱浪潮| 久久九九久精品国产| 久久综合精品国产一区二区三区 | 思思久久99热只有频精品66| 国产精品久久久久乳精品爆| 久久精品国产一区二区电影| 午夜精品久久久久成人| 狠狠综合久久AV一区二区三区| 久久人妻少妇嫩草AV蜜桃| 久久亚洲日韩精品一区二区三区| 久久A级毛片免费观看| 久久精品国产精品青草app| 国产成人99久久亚洲综合精品| 91精品国产91久久久久久| 人妻无码久久精品| 蜜桃麻豆WWW久久囤产精品| 久久久久亚洲精品天堂| 欧美亚洲另类久久综合| 婷婷久久综合九色综合绿巨人| 99久久国产宗和精品1上映| …久久精品99久久香蕉国产| 久久久WWW成人免费精品| 久久久久亚洲AV无码专区首JN| 99国产欧美精品久久久蜜芽 | 久久精品毛片免费观看| 岛国搬运www久久| 亚洲中文字幕久久精品无码APP| 国产精品久久久久9999| 久久亚洲AV无码精品色午夜麻豆 | 久久强奷乱码老熟女网站| 狠狠色丁香久久综合婷婷| 国产成人精品三上悠亚久久| 久久综合久久综合久久综合| 欧美黑人激情性久久| 合区精品久久久中文字幕一区|