循环节

循环节

Time Limit:10000MS  Memory Limit:65536K
Total Submit:71 Accepted:31

Description

　　输入一个分数的分子和分母，输出它的小数形式，精确到小数点后20位。若有循环节，请标明，如：1/3=0.(3),如果结果是一个整数，则直接输出该整数即可，如：分子为64,分母为8,则输出结果为：8。

Input

　　一行，两个整数，中间有一空格隔开，分别为分子、分母。

Output

　　一行，小数表示形式。

Sample Input

17 11

Sample Output

1.(54)

Source

 

尽管这题看起来有点水，但我没把它放到水题集中是有原因的。

这道题我一年前就做过，却一直WA到现在，直到今天跟老师要了数据，看了大神的程序。

这题虽说保留20位小数，但你不能只算到20位，数据中有

input

11 17

output

0.(6470588235294117)

这类但疼情况。

 

下面是仿写某大神的程序，真的需要膜拜。

a数组放余数，b数据放结果。

这样当a中有两个一样的数时，就一定是循环小数了。

 

 

 

var
 m,n,i,j,k,l,pan:longint;
 a,b:array[1..20+1]of longint;

begin
 read(m,n);
 write(m div n);
 m:=m mod n;
 if m=0 then exit;
 write('.');
 for i:=1 to 20 do
  begin
  m:=m*10;
  a[i]:=m mod n;
  b[i]:=m div n;
  m:=a[i];
  for j:=1 to i-1 do
   if a[j]=a[i] then begin pan:=j; break; end;
  if pan<>0 then
   begin
   for j:=1 to pan-1 do write(b[j]);
   write('(');
   for j:=pan to i-1 do write(b[j]);
   write(')');
   exit;
   end;
  end;
  for i:=1 to 20 do write(b[i]);
end.