笔记本电脑怎么散热:谁会VFP编程给我写两个程序,急急啊

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/04 19:17:31
谁会VFP编程给我写两个程序,急急啊
1、 设有一张厚0.1毫米,面积足够大的纸,将它不断地对折。问对折多少次后,其厚度可达到珠穆朗玛峰(8848米)的高度。
2、编程求出200~300之间的数,且满足:它们三个数字之积为42,三个数字之和为12。

1、
a=0.1
b=0 &&计次
do while a<8848*1000
a=a*2 &&每次翻番
b=b+1
loop
enddo
2、
m=200
do while m<300
a=int(m/100)
b=int((m-a*100)/10)
c=m-a*100-b*10
if a*b*c=42 .and. a+b+c=12
?m
endif
m=m+1
loop
enddo

1、
n=1
do while .t.
a=0.1*2^n
if a<8848000
n=n+1
loop
else
? n+"次"
exit
endif
enddo
2、
for i=200 to 300
n=i
n=ltrim(str(n))
a=val(left(n,1))
b=val(subs(n,2,1))
c=val(right(n,1))
if a*b*c=42 .and. a+b+c=12
?? n+","
endif
endfor