1樓:匿名使用者
private sub command1_click()
clsdim a() as integer, b() as integer, m as integer, n as integer
dim i as integer, k as integer, c as integer, x as integer
n = val(text1.text): m = val(text2.text): x = val(text3.text)
redim a(1 to n) as integer '重新定義陣列a,儲存下標對應編號人的佇列狀態
redim b(1 to n) as integer '重新定義陣列b,儲存下標對應編號人的密碼
randomize '隨機數生成器初始化
for i = 1 to n
a(i) = 1 '在列
b(i) = int(rnd(i) * (x - 1 + 1) + 1) '產生每個人的隨機密碼
next
c = 0
k = 0
list1.clear
do while c < n
for i = 1 to n
k = k + a(i) '累計報數
if k = m and c < n then
k = 0
a(i) = 0 '出列
list1.additem "第" & c + 1 & "個出列人的編號為" & i & ",該人的密碼為" & b(i)
m = b(i)
c = c + 1
end if
next i
loop
end sub
2樓:
好像題目沒說完......
用vb編寫一個演算法解決約瑟夫問題 10
c語言程式設計問題:約瑟夫問題求解
3樓:匿名使用者
#include
#include
/*n表示最初有多少個人,m表示報數到多少的人離開,函式joseph返回最後剩下的人的編號*/
4樓:匿名使用者
這個演算法應該比較經典,等高手解答。
我的想法的是,兩數列不斷交替篩選。
5樓:問知道人
用一個迴圈連結串列就可以完成了!
#include
struct nodenode,*list,*p,*r;
void josephu(int n,int k,int m)p->next=list; /*建立一個迴圈連結串列*/p=list;
for(i=1;i<=n+1;i++)
printf("\n"); /*列印連結串列,並檢查迴圈連結串列是不輸入正確*/
p=list;
i=1;
while(p&&inext;
++i;
}for(i=1;inext;
}printf("the out=%d\n",p->data);
r->next=p->next;}}
void main()
約瑟夫問題 用vb實現 我們的考試題目。幫下忙
6樓:匿名使用者
腦力勞動,你的考試題才10分嗎?不要也罷,不差這10分.
提示方法:使用集合,可以簡單列出
7樓:匿名使用者
約瑟夫迴環問題
dim x() as boolean
m=17:n=3
redim x(n)
d=0do while n>1
for i=1 to 17
if x(i)=false then
d=d mod 3+1
if d=3 then
x(i)=true
n=n-1
end if
end if
next
loop
for i=1 to 17
if not x(i) then exit fornext
msgbox "編號" & i
8樓:匿名使用者
a huang 好樣的
vb小王子
vb高手進~!!!!!關於約瑟夫問題
利用迴圈鏈佇列求解約瑟夫問題,並輸出結果。
9樓:紫蕾
procedure jose(n,m:longint);
new(head);
head^du.no:=1;
p:=head;
for i:=2 to n do
begin
new(q);q^.no:=i;
q^.prev:=p;
q^.next:=q;
p:=q;
end;
head^.prev:=p;
p^.next:=head;
p:=head;
for i:=1 to n-1 do
begin
for j:=1 to m do
p:=p^.next;
h[i]:=p^.no;
q:=p^.prev;
p:=p^.next;
q^.next:=p;
p^.prev:=q;
end;
h[n]:=p^.no;
for i:=1 to n do
writeln(h[n]);
至於定義zhi你就dao自己去定義把
C語言約瑟夫環問題,約瑟夫環問題,用C語言編寫
josephus clist.c josephus問題 迴圈連結表實現 include include define false 0 define true 1 typedef int datatype 定義元素型別為整型,也可定義為其他型別 struct node 單連結串列結點型別 typede...
求解C語言程式設計題,C語言程式設計題求解
int main else goto again for i 0 i 100 i 僅供參考 冬一又二分之一 include include include int get3num int a,int b,int n int i int sum 0 for i 0 iif a i 3 0 b sum ...
c語言程式設計問題,c語言程式設計問題?
自我程式設計 1 輸入有範圍,兩個變數輸入都需要驗證,方法變數處置範圍以外,迴圈判斷輸入。2 天數迴圈計數,日期0 6週期自增。用變數累加計數結果。下面是演示 include int main int i,j,a 7,n 366,cnt 0 while a 0 a 6 printf 請輸入a的值 0...