高精度乘以高精度 procedure high_multiply（a,b:hp; var c:hp}var i,j,len:integer;

高精度乘以高精度

procedure high_multiply(a,b:hp; var c:hp}

var i,j,len:integer;