Cod sursa(job #2787527)

Utilizator Ana_22Ana Petcu Ana_22 Data 23 octombrie 2021 17:10:12
Problema Patrate2 Scor 100
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.69 kb
#include <stdio.h>
#include <stdlib.h>

char nr[5000];
int ncf;

void inmultire( int a ) {
  int t, i;
  t = i = 0;
  while( i < ncf || t > 0 ) {
    t = t + a * nr[i];
    nr[i] = t % 10;
    t /= 10;
    i++;
  }
  if( i > ncf )
    ncf = i;
}

int main() {
    FILE *fin, *fout;
    int n, i;
    fin = fopen( "patrate2.in", "r" );
    fscanf( fin, "%d", &n );
    fclose( fin );
    nr[0] = 1;
    ncf = 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 = ncf - 1; i >= 0; i-- )
      fputc( nr[i] + '0', fout );
    fclose( fout );
    return 0;
}