Cod sursa(job #2785556)

Utilizator Remus.RughinisRemus Rughinis Remus.Rughinis Data 18 octombrie 2021 21:38:54
Problema Patrate2 Scor 100
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.76 kb
#include <stdio.h>
#include <stdlib.h>
#define CIFREMAX 3169

int a[CIFREMAX];

int multiply(int na, int b){
  int t = 0,i;

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

    i++;
  }
  if(i>na)
    na = i;

  return na;
}

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

  fin = fopen("patrate2.in","r");
  fscanf(fin,"%d",&n);
  fclose(fin);

  na = 1;
  a[0] = 1;
  for(i=2;i<=n;i++){ /// Factorial de n
    na = multiply(na,i);
  }
//  for(i=na-1;i>=0;i--)
//    printf("%d",a[i]);
//  printf("\n");

  for(i = 0; i<n*n; i++){
    na = multiply(na,2);
  }

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