作者 主題: VB.NET的習題寫不出來><  (閱讀 6244 次)

0 會員 與 1 訪客 正在閱讀本文。

disunset

  • 懷疑的國中生
  • **
  • 文章數: 32
    • 檢視個人資料
VB.NET的習題寫不出來><
« 於: 2004-12-31 05:06 »
習題1:
某人在銀行存入50萬,利率是2.5%如果每年的利息都在繼續存入銀行(複利),請使用vb.net主控台應用程式計算在10年後本金和利息一共多少.

我的寫法是:

Dim a,p as integer
    a=500000
    p=a*(1+0.025)^10
    Console.Write(p)
    Console.Read()

對嗎???

--------------------------------------------
習題2:
請寫VB.NET程式計算計程車的車資,只需在文字方塊輸入里程數後,就可以計算出
車資,里程數在1500公尺內是80元,每多跑500公尺加5元,如不足500公尺以500
公尺計.

這題完全無法著手><...請學長們指點迷津..

--------------------------------------------
習題3:
請建立VB.NET應用程式 計算一根繩子長5公尺,每次將它對折,請算出需要折多少
次,其長度才會小於20公分.

我的寫法:

        Dim x, i As Integer
        x = 500
        For i = 1 To 100
            x = x / 2
            If x <= 20 Then
                Exit For
            End If
        Next i
        TextBox1.Text = i

對嗎??
-----------------------------
第一次學程式設計.所以死腦筋總轉不過來.
請學長們別嫌太簡單沒挑戰性^^"

powerouch

  • 活潑的大學生
  • ***
  • 文章數: 234
    • 檢視個人資料
    • http://itmania.javamoh.net/s9y/
VB.NET的習題寫不出來><
« 回覆 #1 於: 2004-12-31 10:08 »
提示
第一題,請問 VB.NET 的 Integer range 是多少到多少,放得下 500000 或更大的數字嗎?再者,乘出來的會剛好是整數嗎?
第二題,只是單純的數學邏輯,先用手把計算公式寫出來,你的程式就出來了
第三題,改用 Do Loop 如何?
'm no more than a fxxking coding monkey....