1樓:網海1書生
最簡單的方法:
msgbox strreverse(inputbox("請輸入乙個正整數:"))
符合你題意的方法:
dim s1 as string, s2 as string, i as integer
s1 = inputbox("請輸入乙個正整數:")for i = len(s1) to 1 step -1s2 = s2 & mid(s1, i, 1)next
msgbox s2
2樓:殳妮素清一
private
subform_load()
dimi
asinteger
dimtemp
asinteger
dimresult
asstring
randomize
fori=1
to3temp
=rnd*10
iftemp=10
then
temp=1
result
=result
&trim(str(temp))
next
"隨機數:"&
result
"反轉後:"
&strreverse(result)
endsub
3樓:任翮允孤晴
option
explicit
private
sub***mand1_click()
dims1
asstring,
s2as
string,ias
integers1=
txtinput
fori
=len(s1)to1
step
-1s2=s2
&mid(s1,
i,1)
next
txtoutput=s2
endsub
利用遞迴的方法將乙個正整數逆序輸出 20
4樓:兄弟連教育北京總校
演算法:遞迴函式傳入正整數,先輸出最末尾數字,再除以10用遞迴函式繼續迭代,直到該正整數為0時終止遞迴。
例程:#include
void rev(int n)
}int main()//樣例輸出 4321
c語言程式設計判斷輸入的正整數是否為素數
素數 有無限個,除了1和它本身以外不再有其他的因數。所以可以通過for迴圈從2到n 1依次整除n如果能整除則不是素數,否則就是素數。參考 include int fun int n 判斷n是否是素數int i for i 2 i include int main if g 0 printf yes ...
vb程式設計判斷正整數gt3是否為素數
private sub form click n inputbox 請輸入 乙個正整數 內 3 k int sqr n i 2 swit 0 do while i k and swit 0if n mod i 0 then swit 1 else i i 1 end if loop if swit ...
輸入4位數的正整數程式設計逆序輸出這個數
include void main 手機上打的,應該能執行專 屬。include main printf n 利用遞迴的方法將乙個正整數逆序輸出 20 演算法 遞迴函式傳入正整數,先輸出最末尾數字,再除以10用遞迴函式繼續迭代,直到該正整數為0時終止遞迴。例程 include void rev in...