1樓:匿名使用者
樓上的少了一個endfor
set talk off
clear
@1,30 say"九九乘法表"
@3,5 say"*"
for i=1 to 9
@3,5+i*5 say str(i,2)endfor
for i=1 to 9
@3+2*i,5 say str(i,2)for j=1 to i
@3+2*i,5+j*5 say str(i*j,2)endfor
endfor
set talk on
2樓:母羊
set talk off
clear
@1,30 say"九九乘法表"
@3,5 say"*"
for i=1 to 9
@3,5+i*5 say str(i,2)endfor
for i=1 to 9
@3+2*i,5 say str(i,2)for j=1 to i
@3+2*i,5+j*5 say str(i*j,2)endfor
set talk on
3樓:創作者
set talk off
clear
@1,30 say"九九乘法表" ??
?for i=1 to 9
for j=1 to i
??alltrim(str(j))
??"*"
??alltrim(str(i))
??"="
??iif(len(alltrim(str(i*j)))=1," "+alltrim(str(i*j)),alltrim(str(i*j)))
??" "
endfor
?endfor
用vfp 做一個「九九乘法表」
4樓:和平海
第一種:
clea
i=1for i=1 to 9
j=1for j=1 to i
??str(i,1)+'*'+str(j,1)+'='+str(i*j,2)+' '
endfor
?''endfor
第二種:
clea
i=1for i=1 to 9
j=1for j=i to 9
??str(i,1)+'*'+str(j,1)+'='+str(i*j,2)+' '
endfor
?space(i*7)
endfor
第三種是帶**的:
clea
i=1?'┏━━━┓'
?''for i=1 to 9
j=1??'┃'
for j=1 to i
??str(i,1)+'*'+str(j,1)+'='+str(i*j,2)+'┃'
endfor
?''??iif(i<9,'┣','┗')
for k=1 to i
??iif(i<9,'━━━╋',iif(k=9,'━━━┛','━━━┻'))
endfor
??iif(i<9,'━━━┓','')
?''endfor
5樓:龐惜筠
clear
for x=1 to 9 &&行
y=1do whil y<=x && 列??" "+str(y,1)+"*"+str(x,1)+"="+str(x*y,2)
y=y+1
enddo
?endfor
return
6樓:匿名使用者
clear
for x=1 to 9
y=1do whil y<=x
??" "+str(y,1)+"*"+str(x,1)+"="+str(x*y,2)
y=y+1
enddo
?endfor
return
vfp做九九乘法表
7樓:我的王是金閃閃
clear
?? "* "
for i=1 to 9
??str(i,2)
??space(4)
endfor
for i=1 to 9
?str(i,2)+space(2)
for j=1 to i
??str(j*i,2)
??space(4)
endf
endf
&&如果要星號,就用下面的
clear
?? "* "
for i=1 to 9
??str(i,2)+space(4)
endfor
for i=1 to 9
?"*"+space(3)
for j=1 to i
??str(j*i,2)+space(4)endf
endf
8樓:線索記憶
04九九乘法表的記憶方法
9樓:匿名使用者
直接用 ? 把每行的資料顯示出來不就可以了
用vfp作一個乘法口訣表。求大神幫忙!!!
10樓:
for i=1to 9
?" "
?? " "+str(i,2)
endfor
for i=1to 9
for j=1to 9
?str(j,1)
??str(i*j, 3)
endfor
endfor
用visualfoxpro程式語言怎樣編寫乘法口訣表
11樓:
clear
i=1do while i<=9
j=1do while j<=i
??str(j,1)+"*"+str(i,1)+"="+str(i*j,2)+" "
j=j+1
enddo
?i=i+1
enddo
12樓:匿名使用者
***九九乘法表***
clear
for i=1 to 9
for k=1 to i
?? str(k,1)+"×"+str(i,1)+"="+str(i*k,2)+" "
endfor
?endfor
求程式設計vfp編九九乘法表的**
13樓:匿名使用者
這是正的~~~~~~
clear
? "輸出乘法口訣表:"
?for a=1 to 9
for b=1 to a
?? str(b,1)+"*"+str(a,1)+"="+str(a*b,2)+space(2)
next
? next
return
這是倒得~~~~~~
clear
? "輸出乘法口訣表:"
?for a=1 to 9
for b=a to 9
?? str(b,1)+"*"+str(a,1)+"="+str(a*b,2)+space(2)
next
? next
return
用do while 做:
clear
? "輸出乘法口訣表:"
?a=1
do while a<=9
b=1do while b<=9
?? str(b,1)+"*"+str(a,1)+"="+str(a*b,2)+space(2)
b=b+1
enddo
?a=a+1
enddo
return
14樓:
經上機驗證,以下程式完全正確!!
clear
for i=1 to 9
for j=1 to i
?? str(i,2)+"*"+str(j,2)+"="+str(i*j,2)+space(2)
endfor
? endfor
return
九九乘法表的程式設計vfp.6.0
15樓:懸鉤子楊
clear
for i=1 to 9
for j=1 to 9
if j<=i
?? ltrim(str(i))+"x"+ltrim(str(j))+"="+ltrim(str(i*j))+" "
endif
next j
?next i
return
澳丁怎么樣?能用嗎到底?效果怎么樣啊
最好不要用藥物性,指標不治本,你可以採用磁療方法,很多人都在搞 萬惡的微商,國家應取締。澳丁百分百含違禁成分,微商都讓大家檢查化驗,明知道一般人不會去化驗,也找不到化驗的部門。慎用 關注澳丁也有一段時間了,網上的資訊都是 的自問自答,基本可以忽略。其它資訊很少,我想這一定不正常!要麼知道人很少,要麼...
怎么樣才可以做飛行員啊,怎麼樣才可以做飛行員啊?
1 身高不得低於170 釐米,體重不得少於54 公斤 上限高度182 釐米,體重不得超過79 公斤。2 骨與關節無疾病或畸形 無明顯的 0 型或 x 型腿。3 顏面五宮無明顯不對稱。4 無久治不愈的 病,如頭癬 溼疹 牛皮癬 慢性蕁麻疹等。5 無慢性腸胃道疾病 無肝炎或肝脾腫大 無hbsag 陽性 ...
這題怎么做啊!急,這題怎麼做啊!急!!!!
長 6dm 寬 5dm高 10 6 4dm表面積 6 5 6 4 5 4 2 148dm 體積 6 5 4 120dm 其實表面積就是這個圖的面積,幾個加起來就行,體積這個圖形能算出來長寬高。仔細看圖,10分米包含了一個長一個寬,又知道長是6所以寬是4。那麼體積 4 6 5 120 立方分米 面積 ...