vf编程题

来源：百度知道 编辑：UC知道 时间：2024/05/31 05:56:25
设一张纸厚1毫米，面积足够大，将这张纸对折多少次后，其厚度可达100米，编程计算对折的次数．程序文件名为PROG15.PRG

过程要详细，满意的加分
在线等,快,晚上急用!!!

set talk off
clear
j=0.001
n=0
do
{
j=j*2;
n=n+1;
}while(j<100)
?? "n= "n
set talk on
return

你自己命名成PROG15.PRG 就可以拉,如果在不懂,可以问我哈!!

要用2的N次方
2的17次方=131072毫米=13107厘米=1310分米=131米

c编：
#include <stdio.h>
void main()
{
long d(long i);
long sum=0;long i;
for(i=1;sum<100000;i++)
sum=p(i);
printf("%ld\n",i);
}
long p(long i)
{
long d;
if(i=1);
d=2;return(2);
else
d=2*p(i-1);
return(d);
}

set talk off
clear
height=1
n=0
do while(height<=100000)
n=n+1
height=2*height
enddo
?"times="+STR(n)
set talk on

有二种方法:一set talk off
clear
j=0.001
n=0
do
{
j=j*2;
n=n+1;
}while(j<100)
?? "n= "n
set talk on
return

你自己命名成PROG15.PRG 就可以拉,如果在不懂,