Cod sursa(job #18531)

Utilizator ScrazyRobert Szasz Scrazy Data 18 februarie 2007 12:33:28
Problema Culori Scor 4
Compilator fpc Status done
Runda preONI 2007, Runda 2, Clasa a 10-a Marime 0.25 kb
Raporteaza aceasta sursa 
var
 be,ki:text;
 n,i:word;
 v:array[1..1000] of word;

begin
 assign(be,'culori.in');
 reset(be);
 readln(be,n);
 for i:=1 to n do
  read(be,v[i]);

 close(be);
 assign(ki,'culori.out');
 rewrite(ki);
 writeln(ki,'0');
 close(ki);
end.