def f(n,i) dim v[0] var j,k,l for j=1 to n push v,j next for j=1 to i k=shift(v) l=shift(v) push v,l next return k end これで良い？ 見てそのままやればと思って打ち込んだ位の時間。 実機さわれないのともどかしいスマフォ入力待ち時間の合間にちょいちょい打ち込んだので所要時間沢山。