Pascal数组的练习题两道,2`.var a:array['A'..'E',1..4,boolean]of real,