Cod sursa(job #2787255)

Utilizator Alex_HossuHossu Alexandru Alex_Hossu Data 22 octombrie 2021 20:08:55
Problema Patrate2 Scor 100
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.65 kb
#include <stdio.h>

char v[3200];

int ind = 1;

void inmultire(int nr) {
  int x, i;

  x = 0;
  i = 0;
  while((x > 0) || (i < ind)) {
    x += nr * v[i];
    v[i] = x % 10;
    x /= 10;
    i++;
  }

  if(i > ind)
    ind = i;
}

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

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

  v[0] = 1;
  for(i = 2; i <= n; i++)
    inmultire(i);

  for(i = 0; i < n * n; i++)
    inmultire(2);

  fout = fopen("patrate2.out", "w");

  for(i = ind - 1; i >= 0; i--)
    fputc(v[i] + '0', fout);

  fputc('\n', fout);

  fclose(fout);

  return 0;
}