Yo lo que suelo hacer en esos casos es partimos la cadena en trozos mas pequeños que si pueda dividir. Despues averiguo el resto y concateno el trozo siguiente de la parte de la cadena que que falta por tratar al resto. Es como cuando en una división "bajamos"
la parte del dividendo que aún no hemos tratado al lado del resto.
En delphi me queda algo así.
Código Delphi
[-]
while length(strCadenaTratandose) > 6 do
begin
strParteTratandose := copy(strCadenaTratandose,0,6);
iParte := strtoint(strParteTratandose);
iMod:= iparte mod 68;
strCadenaTratandose := inttostr(iMod) +
copy(strCadenaTratandose,7,length(strCadenaTratandose));
end;
Creo que mas o menos algo así debería servirte.
PErdón, edito porque me he dado cuenta de que no he respondido tu pregunta y esto solo te serviría para averiguar el resto final. no el cociente que es lo que buscas