用VFP的FOR迴圈語句實現「金字塔」圖形

2021-05-02 04:02:04 字數 832 閱讀 8630

1樓:匿名使用者

(1)新建一個程式(檔案選單——新建——程式——新建檔案),寫**: s="★"

for i=1 to 6

?ss=s+"★★"

next i 圖: (2)新建一個程式(檔案選單——新建——程式——新建檔案),寫**: s="★★★★★★★★★★★"

j=18

for i=1 to 6

?ss=substr(s,1,j)

j=j-4

next i

圖: (3)新建一個程式(檔案選單——新建——程式——新建檔案),寫**: s="★"

j=14

for i=1 to 7

?space(j)

??ss=s+"★"

j=j-1

next i圖:

2樓:匿名使用者

**如下:clear

input("請輸入要顯示正三角形的行數:") to ns="★"

x=1for i=1 to n

? replicate(s,x)

x=x+1

endfor

input("請輸入要顯示倒三角形的行數:") to ns="★"

x=nfor i=1 to n

? replicate(s,x)

x=x-1

endfor

input("請輸入要顯示立三角形的行數:") to ns="★"

x=1y=n

for i=1 to n

? space(y)+replicate(s,x)x=x+1

y=y-1

endfor

在多重迴圈語句中,在內迴圈體內用break語句可以跳出所有的

break 不能用在復if 語句中。雖然制有時break 看似在 baiif 語句中執du行,如 for s1 s2 s3 但事實上這裡zhi的break 是執行在for語句中的,跳出dao的是for語句。即使輸入 if b1 這也是跳出外層的for語句或switch語句而已。此解答僅供參考。如果有...

VB中正確的迴圈語句是,vb中的迴圈語句

for x 迴圈變數 1 初始值 to 10 終止值 step 2 步進 next 以上為完整的迴圈結構 1.沒有終止值 所以錯 3.初始值比終止值小 所以步進應該為整數 而它是負數 所以也錯4.初始值大於終止值 預設步進為1 無法迴圈 所以也錯 for語句 for counter start to...

oracle中這些語句可以用迴圈或是其它方式簡略寫嗎

使用loop迴圈,比如 for item in select a,b,c from table a where 條件 loop insert into table b a,b,c values item.a,item.b,item.c end loop 也可以使用索引表迴圈,以上只是一個簡單的例子,...