Cod sursa(job #179189)

Utilizator HexStringMaritanu Codrut Catalin HexString Data 15 aprilie 2008 18:50:33
Problema Operatii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.79 kb
#include<stdio.h>
#define nMAX 1001
FILE*f;
int n;
long v[nMAX];
long long operatii;
void citeste()
     {
              f=fopen("operatii.in","r");
              fscanf(f,"%d",&n);
              int i;
              for(i=1;i<=n;i++)
                               fscanf(f,"%ld",&v[i]);
              fclose(f);
     }
void rezolvare()
     {
                int i;
                for(i=2;i<n;i++)
                                if(v[i-1]>=v[i])
                                               operatii+=v[i-1]-v[i];
     }
void afisare()
     {
              f=fopen("operatii.out","w");
              fprintf(f,"%lld",operatii);
              fclose(f);
     }
int main ()
     {
          citeste();
          rezolvare();
          afisare();
          return 0;
     }