1、 黑白球問題源代碼：#include using namespace std;void search(int n,int value,int &count)for(int j=0;j2;j+)valuen=j;if (n=1)int temp=0; int sum=0;for(int k=1;k=27;k+) sum=sum+valuek;if(sum=13)for(int i=1;i=25;i=i+3)18 條/水平線if (valuei=valuei+1)if(valuei+1=valuei+2) temp+;for(i=1;i=3;i+)if(valuei=valuei+3) if(va

2、luei+3=valuei+6)temp+; if(valuei+9=valuei+12)if(valuei+12=valuei+15) temp+;if(valuei+18=valuei+21) if(valuei+21=valuei+24)temp+;for(i=1;i=9;i+)if(valuei=valuei+9)/9 條垂直線if(valuei+9=valuei+18)temp+;/6 條水平面對角線for(i=1;i=19;i=i+9)if(valuei=valuei+4) if(valuei+4=valuei+8)temp+; if(valuei+2=valuei+4)if(va

3、luei+4=valuei+6) temp+;/12 條垂直面對角線for(i=1;i=7;i=i+3)if(valuei=valuei+10) if(valuei+10=valuei+20)temp+;if(valuei+2=valuei+10)if(valuei+10=valuei+18)temp+;for(i=1;i=3;i+)if(valuei=valuei+12) if(valuei+12=valuei+24)temp+; if(valuei+6=valuei+12)if(valuei+12=valuei+18) temp+;/4 條對角面對角線if(value1=value14)i

4、f(value14=value27) temp+;if(value3=value14)if(value14=value25) temp+;if(value7=value14) if(value14=value21)temp+; if(value9=value14)if(value14=value19) temp+;if(temp count)count = temp;elsen-;search(n,value,count); n+;int main()int n = 27; int m = 49;int &count = m;int *value = new intn+1; search(n,

5、value,count);cout 單球的最少線數為： count 0.5if neighbors=3 s=s+1;endendendendends結果：（2）n=4 程序： s=0;n=4;for j1=1:4for j2=1:4for j3=1:4for j4=1:4a1=j1;a2=j2;a3=j3;a4=j4;amax=max(a1,a2,a3,a4);amin=min(a1,a2,a3,a4);numbers=(amax-a1)*(a1-amin)+(amax-a2)*(a2-amin)+(amax-a3)*(a3-amin)+(amax-a4)*(a4-amin);neighbor

6、s=max(abs(a1-a2),abs(a2-a3),abs(a3-a4); if numbers0.5if neighbors=3 s=s+1;endendendendendends結果：（3）n=5 程序： s=0;n=5;for j1=1:4for j2=1:4for j3=1:4for j4=1:4for j5=1:4a1=j1;a2=j2;a3=j3;a4=j4;a5=j5;amax=max(a1,a2,a3,a4,a5);amin=min(a1,a2,a3,a4,a5);numbers=(amax-a1)*(a1-amin)+(amax-a2)*(a2-amin)+(amax-a

7、3)*(a3-amin)+(amax-a4)*(a4-amin)+(amax-a5)*(a5-amin);neighbors=max(abs(a1-a2),abs(a2-a3),abs(a3-a4),abs(a4-a5);if numbers0.5if neighbors=3 s=s+1;endendendendendend ends結果：以此類推：（4）n=6 結果：1776（5）n=7 結果：8216（6）n=8結果：366403 大學生就業問題源代碼：a=1,3/4,3/2,3/2;4/3,1,2,2;2/3,1/2,1,1;2/3,1/2,1,1;n,n=size(a); p=ones

8、(n,100); q=ones(n,100); m=zeros(1,100); m(1)=max(p(:,1);q(:,1)=p(:,1);p(:,2)=a*q(:,1);m(2)=max(p(:,2);q(:,2)=p(:,2)/m(2);l=0.0001;i=2;k=abs(m(2)-m(1);while kpi=i+1; p(:,i)=a*q(:,i-1);m(i)=max(p(:,i);q(:,i)=p(:,i)/m(i);k=abs(m(i)-m(i-1);end a=sum(q(:,i);w=q(:,i)/a; t=m(i);w運行結果4 水塔流量一的容器裝滿水，上底面半徑為r=1m，高度為H=5m，在下地面有一面積為0.001 m2 的小圓孔，現在讓水從小孔流出，問水什么時候能流完？B用 Methamatic 解題的程序代碼：H=5; r=1;S=p; B=0.001;29.85V=;pionts=5,0; Fort=1,H0.001,t=t+1,h=1*V*B/S; H=H-h;29.8HV=;r=r+h/5; S=p*r2;pionts=Appendpionts,H,t;Print水流完需要的時間為 :,