
用VFP的FOR循环语句实现“金字塔”图形
用FOR循环语句(1)★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★(2)★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★...
用FOR循环语句
(1)
★
★★★
★★★★★
★★★★★★★
★★★★★★★★★
★★★★★★★★★★★(2)
★★★★★★★★★★★
★★★★★★★★★
★★★★★★★
★★★★★
★★★
★(3)
★
★★
★★★
★★★★
★★★★★
★★★★★★
★★★★★★★ 展开
(1)
★
★★★
★★★★★
★★★★★★★
★★★★★★★★★
★★★★★★★★★★★(2)
★★★★★★★★★★★
★★★★★★★★★
★★★★★★★
★★★★★
★★★
★(3)
★
★★
★★★
★★★★
★★★★★
★★★★★★
★★★★★★★ 展开
2013-12-22
展开全部
(1)新建一个程序(文件菜单——新建——程序——新建文件),写代码: s="★"
for i=1 to 6
?s
s=s+"★★"
next i 图: (2)新建一个程序(文件菜单——新建——程序——新建文件),写代码: s="★★★★★★★★★★★"
j=18
for i=1 to 6
?s
s=substr(s,1,j)
j=j-4
next i
图: (3)新建一个程序(文件菜单——新建——程序——新建文件),写代码: s="★"
j=14
for i=1 to 7
?space(j)
??s
s=s+"★"
j=j-1
next i
图:
for i=1 to 6
?s
s=s+"★★"
next i 图: (2)新建一个程序(文件菜单——新建——程序——新建文件),写代码: s="★★★★★★★★★★★"
j=18
for i=1 to 6
?s
s=substr(s,1,j)
j=j-4
next i
图: (3)新建一个程序(文件菜单——新建——程序——新建文件),写代码: s="★"
j=14
for i=1 to 7
?space(j)
??s
s=s+"★"
j=j-1
next i
图:
2013-12-22
展开全部
代码如下:CLEAR
INPUT("请输入要显示正三角形的行数:") TO N
S="★"
X=1
FOR I=1 TO N
? REPLICATE(S,X)
X=X+1
ENDFOR
INPUT("请输入要显示倒三角形的行数:") TO N
S="★"
X=N
FOR I=1 TO N
? REPLICATE(S,X)
X=X-1
ENDFOR
INPUT("请输入要显示立三角形的行数:") TO N
S="★"
X=1
Y=N
FOR I=1 TO N
? SPACE(Y)+REPLICATE(S,X)
X=X+1
Y=Y-1
ENDFOR
INPUT("请输入要显示正三角形的行数:") TO N
S="★"
X=1
FOR I=1 TO N
? REPLICATE(S,X)
X=X+1
ENDFOR
INPUT("请输入要显示倒三角形的行数:") TO N
S="★"
X=N
FOR I=1 TO N
? REPLICATE(S,X)
X=X-1
ENDFOR
INPUT("请输入要显示立三角形的行数:") TO N
S="★"
X=1
Y=N
FOR I=1 TO N
? SPACE(Y)+REPLICATE(S,X)
X=X+1
Y=Y-1
ENDFOR
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询