1樓：永恆
clear
set talk off
input '請輸入一個四位數＝' to nt=1do while .t.
m=mod(n,10)
n=int(n/10)
if m<>0 then
t=t*m
endif
if n=0 then
exit
endif
enddo
? treturn
2樓：
y ='0'
x = inputbox("輸入一個4位整數","input ",y,0)
z=val(x)
if z=0
messagebox("不能為0")
return
endif
if z>10000
messagebox("不能超過4位")
return
endif
zf=alltrim(str(z))
ji=iif(substr(zf,1,1)='0',1,val(substr(zf,1,1)))*iif(substr(zf,2,1)='0',1,val(substr(zf,2,1)))
ji=ji*iif(substr(zf,3,1)='0',1,val(substr(zf,3,1)))*iif(substr(zf,4,1)='0',1,val(substr(zf,4,1)))
messagebox(str(ji))
用vfp編寫程式:從鍵盤輸入一個正整數,然後求1到該數範圍之內的所有偶數之和，並輸出要求用for迴圈
3樓：朝華文惠
input to m
if mod(m,2)=1
m=m-1
endif
for i=0 to m step 2
?iendfor
剩下的你自己補上可以嗎？
從0,6,7,8,9這數字中任意選出數字組成四位
6780 2乘3等於6，就等於禪山森找6的唯滲倍數。6780除以6等於1130。答題者附加 我是五年賀畝級的，不一定完全正確 8 7 6 0 6780 7860 6870 6078 7680 7068 7086 8670 8076 9786 7896 9876 從1，2，3，4，5五個數字中任意選出...
Python編寫程式,提示使用者輸入四位整數並以反序顯示
num input 請輸入四位整數 print 你輸入的是 num print 他的相反順序的數是 num 1 def data reserve data x for i in data x 0 i return x 開發一個python程式，提示使用者輸入大於2的整數。全無效的輸入必須被拒絕，包括...
89C2019如何製作四位數字電壓表，四位顯示能實現嗎
利用2051，其中有個比較器，可以進行ad轉換 ad的結果用兩位數碼顯示，我製作成功過。現在要求四位數碼顯示，精度就難以保證了。不行，問題不在顯示四位數碼管，用cd4511配合74ls138用7條線就夠了，但電壓ad採集四位精度的至少用12位ad轉化器，這樣2051兩個io口就明顯不夠用了。建議使用...