Cod sursa(job #2709783)

Utilizator Remus.RughinisRemus Rughinis Remus.Rughinis Data 21 februarie 2021 11:34:14
Problema Patrate2 Scor 80
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.63 kb
#include <stdio.h>
#include <stdlib.h>
#define NRCMAX 1500

char a[NRCMAX];

int multNrMare(int b, int nr){
  int i=0,t=0;

  while(i<nr || t>0){
    t+=b*a[i];
    a[i]=t%10;
    t/=10;
    i++;
  }

  if(i>nr)
    nr=i;
  return nr;
}

int main(){
  int n,nr,i;
  FILE *fin, *fout;

  fin=fopen("patrate2.in","r");
  fscanf(fin,"%d",&n);
  fclose(fin);
  a[0]=1;
  nr=1;

  for(i=0;i<n*n;i++)
    nr = multNrMare(2,nr);
  for(i=n;i>1;i--)
    nr = multNrMare(i,nr);

  fout=fopen("patrate2.out","w");
  for(i=nr-1;i>=0;i--)
    fprintf(fout,"%d",a[i]);
  fprintf(fout,"\n");
  fclose(fout);
  return 0;
}