会python真的可以为所欲为0(回)
350天前
这里还有人吗1(回)
535天前这里还有人吗0(回)
535天前
每天面对着电脑屏幕，敲打键盘。我所面对的并不只是代码，而是一种生活方式。0(回)
760天前到处都是羊，不想上班0(回)
840天前
鸽子
0(回)
844天前procedure substract(a,b:hp;var c:hp); |
var i,len:integer; |
begin |
fillchar(c,sizeof(c),0); |
if a[0]>b[0] then len:=a[0] else len:=b[0]; |
for i:=1 to len do begin |
inc(c[i],a[i]-b[i]); |
if c[i]<0 then begin inc(c[i],10);dec(c[i+1]); end; |
while (len>1) and (c[len]=0) do dec(len); |
c[0]:=len; |
end; |
