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

            93精91精品国产综合久久香蕉| 国产成人综合久久精品红| 久久久久AV综合网成人| av无码久久久久不卡免费网站 | 日本精品久久久久影院日本 | 久久黄视频| 久久久久久国产a免费观看黄色大片| 久久久久久久久久久久久久| 国产精品99精品久久免费| 久久精品这里只有精99品| 日批日出水久久亚洲精品tv| 久久一日本道色综合久久| 久久精品无码免费不卡| 久久综合综合久久综合| 亚洲欧洲中文日韩久久AV乱码| 99久久国产热无码精品免费| 久久人人爽人人爽人人片AV麻烦| 99久久成人18免费网站| 性做久久久久久久| 中文字幕精品久久| 久久夜色精品国产| 26uuu久久五月天| 久久超乳爆乳中文字幕| 无码人妻久久一区二区三区免费| 亚洲午夜福利精品久久| 欧美性大战久久久久久| 国产成人精品久久| 亚洲一区中文字幕久久| 久久精品国产91久久麻豆自制 | 欧美喷潮久久久XXXXx| 日韩久久久久中文字幕人妻| 亚洲国产天堂久久综合网站| 国产欧美久久一区二区| 国产精品9999久久久久| 久久亚洲精品成人av无码网站| 久久九九兔免费精品6| 伊人色综合久久天天网| 色老头网站久久网| 精品熟女少妇AV免费久久 | 久久久精品免费国产四虎| 久久久久女人精品毛片|