程序怎么解释

来源:百度知道 编辑:UC知道 时间:2024/06/15 09:36:00
dim a,b as intergate;
dim c as double;
if (a>0 and b>0) then c=c/a;
end if
if (a>0 or c>0) then c=c+1;
end if
c=b+a;

......
dim a,b as ;
定义a.b为整数(是integer吧)

dim c as double;
定义c为双精度实形数
if (a>0 and b>0) then c=c/a;
如果同时a>0 and b>0那么c=c/a
end if
if (a>0 or c>0) then c=c+1;
如果a>0 或者 c>0那么c=c/a
end if
c=b+a;
最后计算c=b+a