Cod sursa(job #25671)

Utilizator coderninuHasna Robert coderninu Data 4 martie 2007 14:08:10
Problema Balanta Scor 10
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
program balanta;
var fout,fin:text;
    n:integer;

{------------main----------}


begin
 assign(fin,'balanta.in'); reset(fin);
 read(fin,n);
 close(fin);
 assign(fout,'balanta.out');
 rewrite(fout);
 write(fout,0);
 close(fout);
end.