12:
program long_division (divide two arbitrary numbers using a long division algorithm)
parameters: dividend (integer), divisor (integer)
	quotient <- ""
	r <- dividend
	d <- divisor
	if r = 0 then return 0
	while(r<d)
		r <- r*10
		append "." to quotient or "0" if "." has already been appended
	while(r>0)
		append (r integer-divided by d) to quotient
		r <- r modulo d
		r <- r*10
	output quotient
end program long_division