Pascal程序,很急!N个小朋友手拉手站成一个圆圈,从第一个小朋友开始循环报数,报到M的那个小朋友退到圈外,然后他的下一位重新报“1”.这样继续下去,直到最后只剩下一个小朋友,他原来站在

来源：学生作业帮助网编辑：作业帮时间：2024/05/05 09:20:48

Pascal程序,很急!N个小朋友手拉手站成一个圆圈,从第一个小朋友开始循环报数,报到M的那个小朋友退到圈外,然后他的下一位重新报“1”.这样继续下去,直到最后只剩下一个小朋友,他原来站在
Pascal程序,很急!
N个小朋友手拉手站成一个圆圈,从第一个小朋友开始循环报数,报到M的那个小朋友退到圈外,然后他的下一位重新报“1”.这样继续下去,直到最后只剩下一个小朋友,他原来站在什么位置上呢?
最好能解释一下

//这是约瑟夫问题,有很多种解法,以下是一种模拟方法,第12行去掉注释,就是整个出列的过程.

//Josephus0.pas
var a:array[1..100] of boolean;
n,m,t,f,s:integer;
begin
       readln(n,m);
       repeat
              inc(t);
              if t>n then t:=1;
              if not a[t] then inc(s);
              if(s=m) then begin
                      s:=0;
                      //write(t,' ');
                      a[t]:=true;
                      inc(f);
              end;
       until(f=n);
       writeln(t);
end.

Pascal程序,很急!N个小朋友手拉手站成一个圆圈,从第一个小朋友开始循环报数,报到M的那个小朋友退到圈外,然后他的下一位重新报“1”.这样继续下去,直到最后只剩下一个小朋友,他原来站在写给远方小朋友的一封信手拉手不要灾区急与某某小朋友“手拉手”活动的一封信急 12个小朋友手拉手站成一个圆圈,从某一个小朋友开始报数,报到7的那个小朋友退到圈外,然后他的下一位重新报“1”.这样继续下去,最后只剩下一个小朋友,他原来站在什么位置上呢?用pascal 和远方小朋友手拉手五下作文（很急的,十分种以内给分）额,晚了. 产生数pascal程序给出一个整数n(n pascal 有n个正整数,n 远方小朋友手拉手详尽地址给手拉手小朋友的一封信 6个小朋友做游戏,手拉手围成一个圈,不同的围法有多少种 28个小朋友手拉手围成一个正方形,面积大约是多少平方米 PASCAL试题急!任给一个自然数n(n 整数分解(版本2) pascal一个正整数可以分解成若干个自然数之和.请你编一个程序,对于给出的一个正整数n(1 用 Pascal 编写一个程序将十进制整数n转换为二进制数.用 Pascal 编写加说明 pascal问题,求程序：1、文本文件t.in中第一行的一个正整数N（N 求斐波那契数列log(n) pascal算法程序如题,注意是Log（n） N 的倍数 pascal语言写一个程序,对于给定的一个自然数N（0 自然数的无序拆分用pascal程序解决把自然数Ｎ（N