VFP编个小程序!
1、ENDIF 解释一下这个程序的过程：首先，定义了一个大小为30的数组A和一个字符串变量B，并将B初始化为某个字符串。接着，使用FOR循环遍历数组A，如果数组元素不为空且包含变量B，则将该数组元素赋值给另一个数组C，并将C的下标加1。最后，判断是否找到了包含变量B的数组。
2、=1*16 16=2*8 16=4*4 也就是说如果在2到根号X内能找到其中一个数是此数的约数，那此数一定不是质数了。除了1它至少还有一个约数存在，你写int(sqrt(n))与写sqrt(n)的效果是一样的。因为每次增加整数1，准确地讲到根号N 取整就行了。
3、程序写得不好，X是统计出来了，但是没有用着。
一个简单的VFP小程序,有些疑问想请教大家
程序写得不好，X是统计出来了，但是没有用着。
也就是说如果在2到根号X内能找到其中一个数是此数的约数，那此数一定不是质数了。除了1它至少还有一个约数存在，你写int(sqrt(n))与写sqrt(n)的效果是一样的。因为每次增加整数1，准确地讲到根号N 取整就行了。
append【blank】只能一条一条的追加。
IF j = 1 ？ 未找到包含变量B的数组。ELSE ？ 包含变量B的数组有：FOR i = 1 TO j - 1 ？ C(i)ENDFOR ENDIF 解释一下这个程序的过程：首先，定义了一个大小为30的数组A和一个字符串变量B，并将B初始化为某个字符串。
vfp有趣点的小程序
呵呵，我这里有很多，很发一个：SET TALK OFF 计算整个表总共分别需要多少张不同面值的人民币。
append【blank】只能一条一条的追加。
程序写得不好，X是统计出来了，但是没有用着。
IF INT(Y/5)=Y/5 如果是5的整数倍则输出Y，否则继续跳到循环头继续下一循环 ？Y ELSE LOOP ENDIF 只有当Y是5的整数倍时才会执行，也就是说，只有既是5的整数倍，且151的时候才终止循环 IF Y151 STORE .F. TO X ENDIF ENDDO 从代码来看，应该输出，0－151之间的5的整数倍。
vfp一个小程序求输入自然数是否是质数求解释?
也就是说如果在2到根号X内能找到其中一个数是此数的约数，那此数一定不是质数了。除了1它至少还有一个约数存在，你写int(sqrt(n))与写sqrt(n)的效果是一样的。因为每次增加整数1，准确地讲到根号N 取整就行了。
素数即是质数。指在一个大于1的自然数中，除了1和此整数自身外，没法被其他自然数整除的数。程序中使用函数int(i/j)是否整除，进行判别。同理也可使用mod(i/j)=0。
质数又称素数。指在一个大于1的自然数中，除了1和此整数自身外，没法被其他自然数整除的数。
求个VFP小程序编写
ENDIF 解释一下这个程序的过程：首先，定义了一个大小为30的数组A和一个字符串变量B，并将B初始化为某个字符串。接着，使用FOR循环遍历数组A，如果数组元素不为空且包含变量B，则将该数组元素赋值给另一个数组C，并将C的下标加1。最后，判断是否找到了包含变量B的数组。
租金)select 4 replace rzj with x4 return .T.func cbjjs &&计算丢失价格 para x1，x2 select 3 seek x1 x4=iif(found()，cbj*x2，0)select 4 return x4 以上的均为本人商业软件《建筑机具租赁管理系统-VFP版》的一个很小很小部分。
Y ELSE LOOP ENDIF 只有当Y是5的整数倍时才会执行，也就是说，只有既是5的整数倍，且151的时候才终止循环 IF Y151 STORE .F. TO X ENDIF ENDDO 从代码来看，应该输出，0－151之间的5的整数倍。
程序写得不好，X是统计出来了，但是没有用着。
朋友，如何理解你 “所有的”。这范围太泛了。
用VFP编写一个小程序
IF ！EMPTY(A(i)) AND ATC(B， A(i)) 0 && 判断A(i)是否包含变量B C(j) = A(i)j = j + 1 ENDIF ENDFOR IF j = 1 ？ 未找到包含变量B的数组。
一个是大于等于根号X的。例：16=1*16 16=2*8 16=4*4 也就是说如果在2到根号X内能找到其中一个数是此数的约数，那此数一定不是质数了。除了1它至少还有一个约数存在，你写int(sqrt(n))与写sqrt(n)的效果是一样的。因为每次增加整数1，准确地讲到根号N 取整就行了。
尝试：新建一个程序，输入代码：SET SYSMENU OFF ON SHUTDOWN QUIT DO FORM 第一个表单 READ EVENTS &＆ 注意：除了这里使用 READ EVENTS 以外，将其他表单，菜单中的 READ EVENTS 或 CLEAR EVENTS 删除，免得VFP任务重复嵌套。保存后，并将其设置为主文件。连遍 exe 再试试。
程序写得不好，X是统计出来了，但是没有用着。
