改錯題

改錯題（共4道）
1. 指出下列代碼錯誤并說明原因：
Var
I:Integer;(超出范圍)
L:Long;
Begin
L:=32768;
I:=L;
End.

2. 指出下列代碼錯誤并說明原因：
if n>37.5 then
AmountEarned:=(n-37.5)*HourlyRate*1.5+37.5*HourlyRate; （沒有定義n, AmountEarned, HourlyRate）
else
AmountEarned:= n*HourlyRate;

3. 指出下列代碼錯誤并說明原因：
while (total<max) and (sum<=max) and (sum<total)
do statement1;

4. 指出下列代碼錯誤并說明原因：
procedure Tform1.TestBtnClick(Sender:Tobject);
var z,y,x:integer;
begin
x:=100;
y:=0;
try
z:=x div y;
except
on EdivByZero
do begin
z:=-1;
MessageDlg(\'Z\'+IntToStr(z),mtInformation,[mbOK],0);
end
End;

【改錯題】相關文章：

GMAT語法改錯題難點攻略10-02

GMAT句子改錯題解題技巧11-15

西語專八必備：助你改錯題拿高分08-16

GMAT考試改錯題九大關鍵點08-12

GMAT句子改錯題的九大關鍵08-08

英語四六級考試改錯題破解技巧06-17

養(yǎng)成SAT改錯題高效解題八大習慣11-25

盤點最經(jīng)典SAT語法改錯題中的常見錯誤08-21

2017公共英語二級改錯題常見錯誤08-15

GMAT語法改錯題的四大側重點08-10