1、题目
源代码
A=[1,2,3,4,5,6,7,8,9
7.15 8.25 3.20 10.30 6.68 12.03 16.85 17.51 9.30
11.10 15.00 6.00 16.25 9.90 18.25 20.80 24.15 15.50
568 1205 753 580 395 2104 1538 810 694];
A=[A;(A(3,:)-A(2,:)).*A(4,:)]; %添加一行作为每种商品一周的利润
A=[A;A(3,:).*A(4,:)]; %添加一行作为每种商品一周的收入
SumOfIncome=sum(A(6,:)); %总收入
SumOfProfit=sum(A(5,:)); %总利润
[x y1]=find(A==max(A(5,:)));
[x y2]=find(A==min(A(5,:))); %找到最大值最小值元素在矩阵中的位置
fprintf('周利润最大的是商品%d,周利润最小的是商品%d\n\n',A(1,y1),A(1,y2))
A=(sortrows(A',6))';
fprintf('按收入排序:\n');
for(i=1:9)
fprintf('商品%d ',A(1,i));
fprintf('周收入%d',A(6,i));
fprintf('\n');
end
fprintf('\n');
fprintf('一周总收入为%d\n',SumOfIncome);
fprintf('一周总利润为%d',SumOfProfit);
2、题目
某零售店有9种商品的单件进价(元)、售价(元)及一周的销量如表1.1,问哪种商品的利润最大,哪种商品的利润最小;按收入由小到大,列出所有商品及其收入;求这一周该10种商品的总收入和总利润。
源代码
A=[1,2,3,4,5,6,7,8,9
7.15 8.25 3.20 10.30 6.68 12.03 16.85 17.51 9.30
11.10 15.00 6.00 16.25 9.90 18.25 20.80 24.15 15.50
568 1205 753 580 395 2104 1538 810 694];
A=[A;(A(3,:)-A(2,:)).*A(4,:)]; %添加一行作为每种商品一周的利润
A=[A;A(3,:).*A(4,:)]; %添加一行作为每种商品一周的收入
SumOfIncome=sum(A(6,:));
SumOfProfit=sum(A(5,:));
[x y1]=find(A==max(A(5,:)));
[x y2]=find(A==min(A(5,:)));
fprintf('周利润最大的是商品%d,周利润最小的是商品%d\n\n',A(1,y1),A(1,y2))
A=(sortrows(A',6))';
fprintf('按收入排序:\n');
for(i=1:9)
fprintf('商品%d ',A(1,i));
fprintf('周收入%d',A(6,i));
fprintf('\n');
end
fprintf('\n');
fprintf('一周总收入为%d\n',SumOfIncome);
fprintf('一周总利润为%d',SumOfProfit);
3、题目
建立一个命令M-文件:求所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字的立方和等于该数本身。例如,153是一个水仙花数,因为153=1^3+5^3+3^3。
源代码
for(num=100:999)
temp=num;
a=mod(temp,10);
temp=fix(temp/10);
b=mod(temp,10);
c=fix(num/100);
if(a^3+b^3+c^3==num)
fprintf('%d ',num);
end
end