%?A=[0?1?1;1?0?0;1?0?0];
%?find（A==1）
%?length（find（A==1））
%?p=zeros（1size（A1））;
%?if?length（find（A==1））==0
%?size（A1）
%?p（:）=1/size（A1）
%?else
%?for?i=1:size（A1）
%?p（i）=length（find（A（i:）==1））/length（find（A==1））;
%?end
%?end
%?pw=cumsum（p）
m0=input（‘未增長前的網絡節點個數m0:??‘）;
m=input（‘?每次引入的新節點時新生成的邊數m：?‘）;
N=input（‘增長后的網絡規模N：?‘）;
disp（‘初始網絡時m0個節點的連接情況：1表示都是孤立；2表示構成完全圖；3表示隨機連接一些邊‘）;
pp=input（‘初始網絡情況1，2或3：?‘）;
if?m>m0
????disp（‘輸入參數m不合法‘）;
????return;
end
x=100*rand（1m0）;
y=100*rand（1m0）;

switch??pp
????case?1
????????A=zeros（m0）;
????case?2
????????A=ones（m0）;
????????for?i=1:m0
????????????A（ii）=0;%%除了自己和自己不連接外其余都是任意兩兩連接
????????end
????case?3
????????for?i=1:m0
????????????for?j=i+1:m0
????????????????p1=rand（11）;
????????????????if?p1>0.5?
????