• <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-數學

            国产精品99久久久久久宅男小说| 久久天天躁狠狠躁夜夜avapp| 国产韩国精品一区二区三区久久| 久久91精品久久91综合| 久久综合视频网站| 成人妇女免费播放久久久| 欧美久久天天综合香蕉伊| 国内精品久久人妻互换 | 久久天天躁夜夜躁狠狠| 久久久久久狠狠丁香| 色综合久久无码五十路人妻| 久久国产影院| 久久av高潮av无码av喷吹| 亚洲午夜精品久久久久久人妖| 日韩AV无码久久一区二区| 久久精品一区二区三区AV| 国产成人AV综合久久| 看久久久久久a级毛片| 狠狠精品干练久久久无码中文字幕| 女人高潮久久久叫人喷水| 久久久综合香蕉尹人综合网| 亚洲午夜久久久影院| 久久久无码精品亚洲日韩按摩| 精品国产乱码久久久久久呢| 亚洲天堂久久精品| 久久人人爽爽爽人久久久| 国产精品久久久久久久人人看| 国产伊人久久| 91久久精品无码一区二区毛片| 亚洲精品乱码久久久久久按摩| 亚洲午夜久久久| 欧美大香线蕉线伊人久久| 国产成人精品综合久久久久| 亚洲?V乱码久久精品蜜桃 | 日本精品久久久中文字幕| 99久久无码一区人妻a黑| 少妇精品久久久一区二区三区| 久久久一本精品99久久精品88| 国产精品一区二区久久精品涩爱| 久久精品亚洲乱码伦伦中文| 久久综合成人网|