从键盘输入一个4位整数，按如下规则加密后输出。加密规则：每位数字都加7，然后用和除以10 的余数取代该数字；然后讲第一位数和第三位数交换，第二位数与第四位数交换。
function m = encryption(a)
A=[a/1000,a/100,a/10,a];
A=fix(rem(A,10));
A=rem(A+7,10);
m=A(3)*1000+A(4)*100+A(1)*10+A(2);
disp(['加密后的值:',num2str(m)])
end
测试结果：
因篇幅问题不能全部显示，请点此查看更多更全内容