151.國家因興辦臨時性公共建設工程，得徵用私有土地或土地改良物， 徵用逾一定期間，
或二次以上徵用，期間合計逾該一定期間者，土地或土地改良物所有權人得請求需用土
地人徵收所有權，該一定期間為何 ?


(A)1 年
(B)2 年
(C)3 年
(D)5 年

152.依土地徵收條例規定，私有土地經依徵收計畫使用後，依法變更原使用目的，下列 敘述何者有誤？ (A)土地管理機關得標售土地 (B)土地管理機關標售土地時應公告一個月 (C)原土地所有權人或繼承人有依同樣條件優先購買權 (D)優先購買權人未於決標後最長十五日內表示優先購買權者，其優先購買權視為放棄

1. 執行以下 Visual Basic 程式片段，其輸出結果有幾個為-1？(A) 1 (B) 2 (C) 3 (D) 4

( )2. 執行以下 Visual Basic 程式片段，其結果為何？(A) 00 (B) 01 (C) 10 (D) 11 ``` Dim A, B, C, D As Integer A = 1 * 2 * 3 * 2 Xor 4 * 3 / 8 B = 2 * 2 Xor 4 * 3 / 8 C = 2 * 3 And 4 * 3 / 8 D = 2 * 2 Or 4 * 3 / 8 Console.Write(If(A > B, 1, 0)) Console.WriteLine(If(C > D, 1, 0)) ```

( )3. 執行下列 Visual Basic 程式片段，其結果為何？(A) 14 (B) 15 (C) 16 (D) 17 ``` Dim Count As Integer = 0 Dim Data() As Integer = {1, 2, 3} For i = 0 To Data.Length - 1 For j = 0 To Data.Length - 1 For k = 0 To Data.Length - 1 If Data(i) = Data(j) Or Data(i) = Data(k) Then Count += 1 End If Next Next Next Console.WriteLine(Count) ```

( )4. 執行以下 Visual Basic 程式片段，其結果為何？(A) 7 (B) 9 (C) 11 (D) 12 ``` Dim dp(100), i As Integer dp(0) = 1 dp(1) = 2 dp(2) = 2 For i = 3 To 7 dp(i) = dp(i - 2) + dp(i - 3) Next Console.WriteLine(dp(7)) ```

5. 執行下列 Visual Basic 程式，輸出結果為何？(A) 2 (B) 3 (C) 4 (D) 5

( )6. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 1 (B) 2 (C) 3 (D) 4 ```vba Sub Main() Console.WriteLine(Compute($)) End Sub Function Compute(ByVal N As Integer) If N = 1 Then Return 1 If N Had 2 = 1 Then . Return Compute(N - 1) + Compute(N + 1) Else Return Compute(N / 2) End If End Function ```

( )7. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 11 (B) 12 (C) 55 (D) 66 ```txt Dim ans As Integer = 0 For i As Integer = 0 To 11 ans += i Next Console.WriteLine(ans) ```

( )8. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 20 (B) 27 (C) 33 (D) 40 ```txt Dim A(4, 4), i, j As Integer For i = 0 To 3 For j = 0 To 3 If j Nod 2 = 0 Then A(i, j) = 2 Else A(i, j) = 1 End If Next Next For i = 1 To 3 For j = 1 To 3 A(i, j) = A(i - 1, j) + A(i, j - 1) Next Next Console.WriteLine(A(3, 3)) ```

( )9. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 2 (B) 3 (C) 4 (D) 5 ```txt Dim A() As Integer = {2, 5, 7, 9, 3, 1, 2} Dim B() As Integer = {3, 5, 3, 2, 8} Dim DP(A.Length, B.Length) As Integer For i = 1 To A.Length For j = 1 To B.Length If A(i - 1) = B(j - 1) Then DP(i, j) = DP(i - 1, j - 1) + 1 Else DP(i, j) = Math.Max(DP(i - 1, j), DP(i, j - 1)) End If Next Next Console.WriteLine(DP(A.Length, B.Length)) ``` 第 2頁/共 5頁

113年 - 113 不動產經紀營業員資格取得測驗題庫：公寓大廈管理條例51-100#119184

113年 - 113 不動產經紀營業員資格取得測驗題庫：公寓大廈管理條例1-50#119183

113年 - 113 不動產經紀營業員資格取得測驗題庫：公寓大廈管理條例101-152#119173

113年 - 113 不動產經紀營業員資格取得測驗題庫：民法151-185#119172

113年 - 113 不動產經紀營業員資格取得測驗題庫：民法101-150#119171

113年 - 113 不動產經紀營業員資格取得測驗題庫：各式契約書範本及不動產說明書應記載及不得記載事項#119170

113年 - 113 不動產經紀營業員資格取得測驗題庫：民法1-50#119169

113年 - 113 不動產經紀營業員資格取得測驗題庫：民法51-100#119168

113年 - 113 不動產經紀營業員資格取得測驗題庫：土地法101-152#119167

113年 - 113 不動產經紀營業員資格取得測驗題庫：土地法51-100#119166