#2391: Pascal Newbie help


dailinyang (dailin)

學校 : 不指定學校
編號 : 8055
來源 : [120.101.182.114]
最後登入時間 :
2024-05-23 10:53:20
a002. 簡易加法 | From: [60.248.15.133] | 發表日期 : 2009-09-18 22:47

Hi, all:

Please help me to solve this problem. This Code works fine on my computer. But it doesn't work on this Site. Here is the Code.

program Files;
var
   a: INTEGER;
   b: INTEGER;
 
begin
while not eof do
begin
      readln(a,b);
      a := a+b;
      writeln( a );
end;
end.

 

THX.

 
#2393: Re:Pascal Newbie help


morris1028 (碼畜)

學校 : 國立花蓮高級中學
編號 : 3529
來源 : [114.37.59.62]
最後登入時間 :
2021-07-12 19:00:43
a002. 簡易加法 | From: [118.161.218.29] | 發表日期 : 2009-09-19 07:05

Hi, all:

Please help me to solve this problem. This Code works fine on my computer. But it doesn't work on this Site. Here is the Code.

program Files;
var
   a: INTEGER;
   b: INTEGER;
 
begin
while not eof do
begin
      readln(a,b);
      a := a+b;
      writeln( a );
end;
end.

 

THX.

我得到一個AC ... 內容如下 (我不會PASCL,所以沒辦法詳細的解釋)

var
   a: longint;
   b: longint;
 
begin
while not eof do
begin
      readln(a,b);
      a := a+b;
      writeln( a );
end;
end.

 
#2394: Re:Pascal Newbie help


dailinyang (dailin)

學校 : 不指定學校
編號 : 8055
來源 : [120.101.182.114]
最後登入時間 :
2024-05-23 10:53:20
a002. 簡易加法 | From: [60.248.15.133] | 發表日期 : 2009-09-19 08:30

瞭解,原來是產生溢位了。

謝謝指教。

 
ZeroJudge Forum