精品偷拍一区二区三区,亚洲精品永久 码,亚洲综合日韩精品欧美国产,亚洲国产日韩a在线亚洲

  • <center id="usuqs"></center>
  • 
    
  • (1) 求1-1000以內(nèi)所有完全平方數(shù)..

    (1) 求1-1000以內(nèi)所有完全平方數(shù)..
    1 求1-1000以內(nèi)所有完全平方數(shù).
    2 從鍵盤輸入若干個(gè)數(shù),以0結(jié)束,統(tǒng)計(jì)正數(shù)和負(fù)數(shù)的個(gè)數(shù).
    其他人氣:518 ℃時(shí)間:2020-01-30 22:29:04
    優(yōu)質(zhì)解答
    Private Sub Command1_Click()Dim i%,k%For i = 1 To 1000If Int(Sqr(i)) = Sqr(i) Then Print i,:k = k + 1If k Mod 5 = 4 Then Print:k = 0NextEnd SubPrivate Sub Command2_Click()Dim OS%,JS%,m$m = InputBox("...
    我來(lái)回答
    類似推薦
    請(qǐng)使用1024x768 IE6.0或更高版本瀏覽器瀏覽本站點(diǎn),以保證最佳閱讀效果。本頁(yè)提供作業(yè)小助手,一起搜作業(yè)以及作業(yè)好幫手最新版!
    版權(quán)所有 CopyRight © 2012-2024 作業(yè)小助手 All Rights Reserved. 手機(jī)版