[請益] 請教一個小小的問題

[dagood (想回高雄了~~)]

        不好意思 我是使用maple套裝軟體
        但是因為程式寫法應該不會差太遠
        我可以試試
        我在寫一個迴圈
        史的
        給定前三個數 2,0,1
        之後的每一個數都是前三個數相加除以10的餘數
        且我要設定i 到重複出現2,0,1 停止

        a[1]:=2
        a[2]:=0
        a[3]:=1

        for i from 1 to 100 do
        a[i+3]:=modp(a[i]+a[i+1]+a[i+2],10)
        end do;

        我想要把這個迴圈的 from 1 to 100
        改到 from 1 到 2,0,1 連續三數出現為止 我的while要怎麼寫呢
        或是有其他寫法...thx

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 112.104.131.36
推 Littlechozy:把 to 改成 while
→ Littlechozy:while not(a[i-1]=2 and a[i]=0 and
→ Littlechozy:and a[i+1]=1 and i>2)
→ dagood:非常感謝您......謝謝~~