word版可編輯-visualbasic程序設(shè)計教程第四版劉炳文編著清華大學精心整理docxdocx-展示頁
2025-07-24 11:43本頁面
【正文】 4，7，14，其和1+2+4+7+14=28，因此28是一個完全數(shù)，編寫一個程序，從鍵盤上輸入整數(shù)M和N，求出M和N之間的所有的完全數(shù)form load()39。編寫程序，輸出30以內(nèi)滿足上述關(guān)系的整數(shù)組合。iEndNextIfa(j)。j)。ia(2ThenIf1i21j3)。iTab(30To=jFor=To=ForInteger5)a(1Sub當輸入1時結(jié)束程序。 pEnd Sub、給定三角形的3條邊長，計算三角形的面積。 年后。s第七章．編程計算并輸出S的值:s=2+4+6+8+…+100dim i,s as integers=0for i=2 to 100 step 2s=s+inextprint s、我國現(xiàn)有人口為13億，設(shè)年增長率為1%，編寫程序，計算多少年后增加到20億。設(shè)v0=，t=，g=，在程序中把g定義為符號常量，用inputbox函數(shù)輸入v0和t兩個變量的值。y、輸入以秒為單位表示的時間，編寫程序，將其轉(zhuǎn)換為幾日幾時幾秒。Dim a as singleFor i=1 to 4 a=inputbox（“請輸入一個數(shù)：”，“數(shù)據(jù)輸入”） sum=sum+a n=n+1 avg=sum/nnext iprint “和是：”,sumprint “平均值是：”，avg、編寫程序，要求用戶輸入下列信息：姓名、年齡、通信地址、郵政編碼、電話，然后將輸入的數(shù)據(jù)用適當?shù)母袷皆诖绑w上顯示出來。Visual Basic 程序設(shè)計教程部分習題參考第四版 劉炳文 編著 清華大學出版社第五章、從鍵盤上輸入4個數(shù)，編寫程序，計算并輸出這4個數(shù)的和及平均值。通過inputbox函數(shù)輸入數(shù)據(jù)，在窗體上顯示和及平均值。Dim a as variantFontsize=20a=inputbox（“請輸入姓名：”，“數(shù)據(jù)輸入”）print “姓名：”；aa=inputbox（“請輸入年齡：”，“數(shù)據(jù)輸入”）print “年齡：”；aa=inputbox（“請輸入通信地址：”，“數(shù)據(jù)輸入”）print “通信地址：”；aa=inputbox（“請輸入郵政編碼：”，“數(shù)據(jù)輸入”）print “郵政編碼：”；aa=inputbox（“請輸入電話：”，“數(shù)據(jù)輸入”）print “電話：”；a．設(shè)a=5，b=，c=，編程序計算： y=（πab）/（a+bc）程序：Dim a as single，b as single，c as singlea=5b=c=pi=y=（pi*a*b）/（a+b*c）print “結(jié)果是：”。Dim a as long，d as integer ，h as integer，s as integera=inputbox（“請輸入秒數(shù)：”，“數(shù)據(jù)輸入”）d=int（a/86400）h=int（（ad*86400）/3600）s=ad*86400h*3600print d；“日”；h；“時”；s；“秒”、自由落體位移公式為：s=gt2/2+v0t其中v0為初始速度，g為重力加速度，t為經(jīng)歷的時間，編寫程序，求位移量s。Dim v as single，t as single，s as singleg=v= inputbox（“請輸入初始速度：”，“數(shù)據(jù)輸入”）v=val（v）t=inputbox（“請輸入經(jīng)歷的時間：”，“數(shù)據(jù)輸入”）t=val（t）s=g*t*t/2+v*tprint “位移量是：”。Private Sub Form_click()Dim p As DoubleDim r As SingleDim n As Integerp = 130000000r = n = 0Do While p = 200000000p = p * (1 + r)n = n + 1LoopPrint n。 中國人口增加到。編寫程序：首先判斷給出的3條邊能否構(gòu)成三角形，如可以構(gòu)成，則計算并輸出三角形的面積，否則要求重新輸入。Dim a as single；b as single；c as singleStart:a = inpu
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號-1