2012年7月12日 星期四

奇怪的老闆

內容 : 正體->简体 
有一個很古怪的老闆,他有N名員工,每個人有自己的薪水,這個老闆很喜歡去找出編號第A到編號到B之間的最高薪水與最低薪水的差,但是你以為他只找一次嗎?當然不是,他有強迫症,他每隔1秒就隨機寫兩個數字,然後找出這段數字裡最多薪水的錢,並寫下來作成紀錄。

老闆每次都要他的秘書幫他找,他的秘書受不了,想請你幫她寫一個程式讓他可以很迅速的找到,在這區間最高薪水與最低薪水的差是多少錢, 好讓他可以輕鬆一下。

輸入說明 :
第一行有兩個數字N(1 ≤ N ≤ 50,000), Q (1 ≤ Q ≤ 200,000) 代表有N名員工跟Q個問題。

接下來有 N行代表第1~N名的員工薪水。

在接下來的Q行有兩個數字 a,b 
"(0 < a < = b < = n)" 代表老闆寫的兩個數字,請你找出這段區間的最高薪水與最低薪水的差。

輸出說明 :
對於每一個問題,印出最高薪水與最低薪水的差為何?並換行。
範例輸入 :

6 3 






1 5 
4 6 
2 2 
範例輸出 :



0

1 則留言:

  1. Private Sub Form_Load()
    Me.Hide
    Dim max, min As Long
    Dim n()
    Open App.Path & "\in.txt" For Input As #1
    Open App.Path & "\out.txt" For Output As #2
    Input #1, x, y
    ReDim n(x)
    For i = 1 To x
    Input #1, X1
    n(i) = X1
    Next
    For i = 1 To y
    max = 0
    min = 200000
    Input #1, n1, n2
    For j = n1 To n2
    If n(j) < min Then min = n(j)
    If n(j) > max Then max = n(j)
    Next
    Print #2, max - min
    Next
    Close
    Close
    End
    End Sub

    回覆刪除