محاسبه ی 1 روی !n تا 60 رقم اعشار

محاسبه ی 1 روی !n تا 60 رقم اعشار :

#include<stdio.h>
  #include<conio.h>
  #include<stdlib.h>
  main()
   {
    int q[61],a[61],i,n,s;
   
    printf("\n N ro vared kon ta 1/N! ro hesab konam: ");
    scanf("%d",&s);
    if(s==1)
      {
        
        printf("\n1/1!=1");
        getch();
        exit (0);
      }
    for(i=0;i<=60;i++)
     {
      a[i]=0;
      q[i]=0;
     }
    for(n=2;n<=s;n++)
     for(i=0;i<=60;i++)
      {
       if(n==2 && i==0)
   a[0]=1;
       q[i]=a[i]/n;
       if(q[i]==0)
   a[i+1]=a[i]*10+a[i+1];
       else
   a[i+1]=(a[i]%n)*10+a[i+1];
       a[i]=q[i];
      }
   
    printf("\n 1/%d!= 0.",s);
    for(i=1;i<=60;i++)
        printf("%d",a[i]);
    getch();
    return 0;
   }