1、启动VFP程序,并设置文件存放目录
推荐使用代码方式: set default to <路径>
这里使用默认路径,就不再指定目录了
2、在 命令 窗口中打开程序编辑器
推荐使用代码方式: modify command <程序名> 创建程序
这里使用 modi comm 使用一个for构图 创建一个名为 使用一个for构图 的程序
3、****输入以下代码****
input "输入1到9之间的数:" to n
for i=n to -n step -1
?space(abs(i))
??alltrim(str(int(10^(n+1-abs(i))/9)^2,20))
endfor
4、程序简略解析:
程序主干部分分解为4步,将函数括号展开,易于阅读
函数由内到外执行,(图中两个"第2步"并不是错字)
1、***第1步***详解
10^(n+1-abs(i))/9
使用10的(n+1-abs(i))次方可以得到一个10、100、100等等类似的整数
将得到的整数 /9 则该整数将转化为 1.11、11.11、111.11等等数
2、***第2步***详解
将第一步得到的数取整，获得1、11、111、1111、11111之类的整数
再将这种数平方，神奇的事情发生了！
按照上面的例子，它们的平方依次为
0
1
121
12321
1234321
123454321
神不神奇？
3、***第3步**详解
第三步就是将第二部得到的数字转换为字符型
4、***第4步***详解
第四步只是去空格，为了排列整齐
可以在运行的时候将这一步注释掉，看看会发生什么
