竖式除法的模拟程序实现

把作除的两个数每一个位存入两个等长的数组，怎样实现对这两个数组作除的程序模拟（不限语言）？
不使用二分法等其他能够代替除法的算法，最好能模拟竖式除法的过程。对于把数的每一位存入数组的程序已实现。matlab： function b = unify(a)

k = find([a,'.']=='.', 1);

a(a=='.') = '';

b = zeros(1,M);

e = min(numel(a), M);

b((N-k+1)+(1:e)) = a(1:e) - '0';

end（M=50，N=25）即存入50位的数组

除法就是连续 减 减的次数就是商