Cod sursa(job #20605)

Utilizator nod_softwareBudisteanu Ionut Alexandru nod_software Data 21 februarie 2007 20:13:52
Problema Secv Scor 20
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
Raporteaza aceasta sursa 
program secv;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var fin,fout:text;
begin
  assign(fin,'secv.in');
  assign(fout,'secv.out');
  reset(fin);
  rewrite(fout);
  writeln(fout,-1);
  close(fout);
end.