高精度除以低精度 procedure devide(a:hp;b:longint; var c:hp; var d:longint);{c:=a div b procedure devide(a:hp;b:longint; var c:hp; var d:longint);{c:=a div b; d:= a mod b}var i,len:integer; 参考答案 查看答案