O(nm)還在冥思苦想要模擬的小伙伴們要哭了，這道題早已有公式啦~~~但是這道題不能直接輸出最后那個人，要輸出順序=_=。var a:array[1..100] of longint; n,m,p,i,j:longint;begin readln(n,m); for i:=1 to n-1 do a[i]:=i+1; a[n]:=1; p:=n; for i:=1 to n do begin for j:=1 to m-1 do p:=a[p]; write(a[p],' '); a[p]:=a[a[p]]; end;end.
