高精度除以高精度procedure high_devide(a,b:hp; var c,d:hp);vari,len:integer;
高精度除以高精度
procedure high_devide(a,b:hp; var c,d:hp);
var
i,len:integer;
相关考题：
高精度数的定义：typehp=array[1..maxlen] of integer;1．高精度加法procedure plus ( a,b:hp; var c:hp);var i,len:integer;
高精度除以低精度procedure devide(a:hp;b:longint; var c:hp; var d:longint);{c:=a div b; d:= a mod b}var i,len:integer;
排列的生成：（1..n）procedure solve(dep:integer);vari:integer;