2012年8月5日 星期日

四捨五入


內容 : 
拿氣溫來說,攝氏15度和攝氏15.05度的差距對人來說差異實在不大,有了數學概數的觀念,我們可以透過四捨五入法來得到一個數字的估計值,進而方便統計。
現在請你將一些小數利用程式來四捨五入。
輸入說明 :
共計三個測資點,每個測資檔中有多行小數n(-1<=n<=1),至多小數點以下有100位數
輸出說明 :
請輸出四捨五入至小數點以下第二位的結果
範例輸入 :
1.00000 
0.5 
0.715 
0.1234567890 
-0.995

範例輸出 :
1.00 
0.50 
0.72 
0.12 
-1.00

1 則留言:

  1. Private Sub Form_Load()
    Me.Hide
    Open App.Path & "\in.txt" For Input As #1
    Open App.Path & "\out.txt" For Output As #2
    Do While Not EOF(1)
    Line Input #1, x
    a = Left(x, 5)
    If a < 0 Then
    a = a - 0.005
    Else
    a = a + 0.005
    End If
    a = Int((a * 100)) / 100
    Print #2, Format(a, "0.00")
    Loop
    Close
    Close
    End
    End Sub

    回覆刪除