free pascal输入正整数a,b,c，输出a/b的小数形式，精确到小数点后c位。a,b<=10^6，c<=100

var a,b:real;c:longint;
begin
readln(a,b,c);
if c=0 then begin
writeln(a/b:0:0);exit;
end;
write(trunc(a/b));
a:=a-trunc(a/b)*b;
write('.');
while c>1