exe0809.m

用matab写的一些源程序

%Exe0809
a=[1 2;3 4];
fid=fopen('Exe0809.mat','w');
fwrite(fid,a);
fclose(fid);
fid=fopen('Exe0809.mat','r');
a=fread(fid,[2,2])
b=sin(a)
fclose(fid);
fid=fopen('Exe0809.mat','w');
fwrite(fid,b);
fclose(fid);