[求助]pascal中子界类型问题
最近在学习pascal ，看到子界章篇。测试了个程序，有点疑问。
测试程序：
program p16;
type a=1..10;
var t:a;
begin
readln(t);
writeln('t=',t);
end.
程序运后我输入20，输出为t=20;
我的疑问是：20超出1..10的界限了，为什么不会报错?
但是在下面这个测试程序中它会判断界限的问题：
program p17;
type a=1..10;
var b:a;
begin
b:=20;
end.
编译时，出现错误提示：Error 76:constant out of range.