integer是整型，不能用“/”，只有实型real可以用，如果要用整型，则把“/”改成div.
楼上正解，不过如果不能整除用div就容易错了
把INTEGER换REAL 拉- - 这种题目。。
program jitutonglong; var a,b:integer; begin a:=trunc((46*4-128)/(4-2)); b:=46-a; write('a', 'b'); end.
