UC知道pascal 高手进来
来源：百度知道 编辑：UC知道 时间：2024/06/13 15:10:55
我用pascal 做鸡兔同笼，46个头，128只脚。应该是这样输入：
program jitutonglong;
var
a,b:integer;
begin
a:=(46*4-128)/(4-2)
b:=46-a
write('a', 'b')
end.
但是为什么打印不出来？
这是怎么回事？
他老是显示：
Error 26:Type mismatch.
program jitutonglong;
var
a,b:integer;
begin
a:=(46*4-128)/(4-2)
b:=46-a
write('a', 'b')
end.
但是为什么打印不出来？
这是怎么回事？
他老是显示：
Error 26:Type mismatch.
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.