以下是本人的程式碼(VB6.0)：
測試結果為NA
Dim n1 As Integer, n2 As Integer
Open CONS For Input As #1
Do Until EOF(1)
Input #1, n1, n2
Print n1 + n2
Loop
能宣告的都有宣告，完全想不出錯誤在哪......
以下是本人的程式碼(VB6.0)：
測試結果為NA
Dim n1 As Integer, n2 As Integer
Open CONS For Input As #1
Do Until EOF(1)
Input #1, n1, n2
Print n1 + n2
Loop
能宣告的都有宣告，完全想不出錯誤在哪......
要先Input才能知道是否EOF?
管它的 用C++吧= =b
/'********************************************************************************'/
/' Problem: a002 "簡易加法" '/
/' Language: BASIC '/
/' Result: AC (4ms, 664KB) on ZeroJudge '/
/' Author: x000032001 at 2010-10-29 10:39:37 '/
/'********************************************************************************'/
Dim a As Integer ,b as Integer
Open Cons For Input As #1
Input #1,a,b
Do Until Eof(1)
Print a+b
Input #1,a,b
Loop
VB和FB畢竟不是完全相同的東西…
ＣＥ就算了吧～ 我弄ＢＡＳＩＣ也超常有沒原因的CE（我也是為了練習VB）
習慣就好了，多試試看自己找Bug吧！
不過，這邊的題庫真的很棒，是很值得花時間待的地方，呵呵
題外話… Free Basic的中文相關資料真的是少得可憐
VB和FB畢竟不是完全相同的東西…
ＣＥ就算了吧～ 我弄ＢＡＳＩＣ也超常有沒原因的CE（我也是為了練習VB）
習慣就好了，多試試看自己找Bug吧！
不過，這邊的題庫真的很棒，是很值得花時間待的地方，呵呵
題外話… Free Basic的中文相關資料真的是少得可憐
VB跟FB本來就有差別了 拿VB寫的東西來傳一定常常吃CE
自己去抓FB的IDE寫不是更方便嗎?
話說FB光他的wiki就夠查了 中文化嘛... 還是讀英文吧!
為了解題學個沒啥人用的FB我覺得CP值太低了