关于程序的调试
我想编一段程序,求半径为从1到r的,高度从１到z变化的圆柱体的体积，输出的时候按照第一行为半径，第一列为高度，其余的地方为体积，我编的程序如下，总是不行，请高手指点，谢谢！function =fmianji(r,z)
fid1=fopen('mianji1.dat','a+');
%fid2=fopen('mianji2.dat','a+');
c=zeros(r+1,z+1);
for k=1:r;
c(1,k+1)=k;
s(k)=pi*k^2;
l(k)=2*pi*k;
for h=1:z;
c(h+1,1)=h;
v(k)=s(k)*h;
b(k)=2*s(k)+l(k)*h;
c(h+1,k+1)=v(k);
fprintf(fid1,'% f\n',c);
%fprintf(fid2,'% f % f\n',y,b(k));
end
end
fclose(fid1);
%fclose(fid2);
[ 本帖最后由 sigma665 于 2008-5-17 16:37 编辑 ]
回复 楼主 的帖子
有什么错误提示吗或者运行的结果 原帖由 jgchen1973 于 2008-5-17 15:15 发表 http://www.chinavib.com/forum/images/common/back.gif
我想编一段程序,求半径为从1到r的,高度从１到z变化的圆柱体的体积，输出的时候按照第一行为半径，第一列为高度，其余的地方为体积，我编的程序如下，总是不行，请高手指点，谢谢！
function =fmianji(r,z)
...
参考此帖可以解决您的问题：
http://www.chinavib.com/forum/viewthread.php?tid=54241&page=1#pid340884 输出的格式游戏，呵呵
function =fmianji(r,z)
fid1=fopen('mianji2.dat','a+');
for i=1:r+1
fprintf(fid1,' %f',i-1);
end
fprintf(fid1,'\n');
for h=1:z;
fprintf(fid1,' %f',h);
for k=1:r
v=pi*k^2*h;
fprintf(fid1,' %f',v);
end
fprintf(fid1,'\n');
end
fclose(fid1);
谢谢
谢谢教授,可以了而且完全符合我的要求!!!!
页:
[1]