您所在位置：主题：Tp和Fp有什么区别
grundfos
[专家分：270] 发布于 2005-11-08 14:22:00
有些错误不会提前报错，如：Var a:array[x..y] of 基类型；下标p出现小于x或大于y的情况，如下：
var a:array[1..100] of integer;
i:integer;
begin
fillchar(a,sizeof(a),0);
i:=100;
while a=0 do i:=i-1;
write(a);
readln
end.
这个程序在TP下运行没有问题，但在FP下就会出现201错误。原因是while循环结束后的i值是0，输出a[0]的值。
为什么在Tp下没问题，而在Fp下就有问题了？这方面Tp和Fp有什么区别？
var a:array[1..100] of integer;
i:integer;
begin
fillchar(a,sizeof(a),0);
i:=100;
while a=0 do i:=i-1;
write(a);
readln
end.
这个程序在TP下运行没有问题，但在FP下就会出现201错误。原因是while循环结束后的i值是0，输出a[0]的值。
为什么在Tp下没问题，而在Fp下就有问题了？这方面Tp和Fp有什么区别？
