匿名用户
1级
2014-09-26 回答
还需要不?
追问:
需要的
追答:
clc;
clear all;
close all;
c=[72 30 83 81 5 7 46 21]
sw=max(ceil(log(c)/log(10)));
for i=0:100
rem(c,10^(sw-i));
if sum(rem(c,10^(sw-i)))==0
xw=sw-i;
break;
end
end
for i=xw:sw-1
r=rem(floor(c/(10^i)),10);
[x0 x1]=sort(r);
c=c(x1)
end
追答:
clc;
clear all;
close all;
c=[72 30 83 81 5 7 46 21]
sw=max(ceil(log(c)/log(10)));
for i=0:100
rem(c,10^(sw-i));
if sum(rem(c,10^(sw-i)))==0
xw=sw-i;
break;
end
end
for i=xw:sw-1
r=rem(floor(c/(10^i)),10);
[x0 x1]=sort(r);
c=c(x1)
end
追答:
clc;
clear all;
close all;
c=[72 30 83 81 5 7 46 21]
sw=max(ceil(log(c)/log(10)));
for i=0:100
rem(c,10^(sw-i));
if sum(rem(c,10^(sw-i)))==0
xw=sw-i;
break;
end
end
for i=xw:sw-1
r=rem(floor(c/(10^i)),10);
[x0 x1]=sort(r);
c=c(x1)
end
追答:
clc;
clear all;
close all;
c=[72 30 83 81 5 7 46 21]
sw=max(ceil(log(c)/log(10)));
for i=0:100
rem(c,10^(sw-i));
if sum(rem(c,10^(sw-i)))==0
xw=sw-i;
break;
end
end
for i=xw:sw-1
r=rem(floor(c/(10^i)),10);
[x0 x1]=sort(r);
c=c(x1)
end
追答:
clc;
clear all;
close all;
c=[72 30 83 81 5 7 46 21]
sw=max(ceil(log(c)/log(10)));
for i=0:100
rem(c,10^(sw-i));
if sum(rem(c,10^(sw-i)))==0
xw=sw-i;
break;
end
end
for i=xw:sw-1
r=rem(floor(c/(10^i)),10);
[x0 x1]=sort(r);
c=c(x1)
end