magic.m

来自「matlab7.0从入门到精通(光盘内容)」· M 代码 · 共 11 行

fid=fopen(‘magic.m’,’r’);
count=0;
while `feof(fid)
    line=fgetl(fid);
    if isempty(line)|strncmp(line,’%’,1)
        continue
    end
    count=count+1;
end
disp(sprintf(‘%d lines’,count));