clc;clear;
m=input（‘請輸入行：‘）;
n=input（‘請輸入列：‘）;
A=randint（mn）;
A
for?k=1:2
????sum=zeros（1m）;
????l=input（‘請選擇奇偶校驗（0、偶校驗??1、奇校驗）：‘）;
????for?i=1:m
????????for?j=1:n
????????????sum（i）=sum（i）+A（ij）;
????????????z=sum（i）;
????????end
????????if?rem（z2）==l
????????????A（in+1）=0;
????????else
????????????A（in+1）=1;
????????end
????end
????A
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????395??2012-05-18?18:37??jioujiaoyan1.m

?????文件????????425??2012-05-18?18:35??jioujiaoyan2.m

?????文件???????1076??2012-05-18?18:55??奇偶校驗1和2的文本.txt

-----------?---------??----------?-----??----

?????????????????1896????????????????????3