Cod sursa(job #127371)

Utilizator drywaterLazar Vlad drywater Data 23 ianuarie 2008 19:41:32
Problema Litere Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include <stdio.h>
char k;
int n,i,f,p,a,v[27];
FILE *in,*o;
int main()
{
in=fopen("litere.in","r");
o=fopen("litere.out","w");
fscanf(in,"%d\n",&n);
for (i=1;i<=n;i++)
 {
 fscanf(in,"%c",&k);
 v[k-'a'+1]++;
 for (f=k+1;f<=26;f++)
  p=p+v[f];
 }
fprintf(o,"%d",p);
fclose(in);
fclose(o);
return 0;
}