摘要： 模拟除法的竖式运算。var s:string; b,m,len,i,n:longint; a,c:array[1..1000] of integer;begin readln(s); readln(b); len:=length(s); for i:=1 to len do a[i]... 阅读全文