Cod sursa(job #162358)
Utilizator | Data | 19 martie 2008 22:20:31 | |
---|---|---|---|
Problema | Energii | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.13 kb |
var f,g:Text;
begin
assign(f,'energii.out');reset(f(;
assign(g,'energii.out'); rewrite(g);
write(g,'-1');
close(g);
close(f);
end.