while gets do	
	a,b,n = $_.split.map(&:to_i)
	data = Array.new
	f = (a.to_f / b.to_f).to_s
	i = 2
	finite = true
	while true
		if data.index(f[i].to_i)
			finite = false
			break
		elsif !f[i]
			break
		end
		data << f[i].to_i
		i += 1
	end
	print data,"\n"
	if finite
		s = (data.size <= n ? data[0,n].inject{|x,y| x+y} : data.inject{|x,y| x+y}*(n/data.size) + data[0,data.size%n].inject{|x,y| x+y})
	else
		s = 0
		(n/data.size).times{ s += data.inject{ |x,y| x+y } }
		(n%data.size).times{ |i| s += data[i] }
	end
	puts s
end