Cod sursa(job #16948)
Utilizator | Data | 14 februarie 2007 15:49:08 | |
---|---|---|---|
Problema | Secventa 5 | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.27 kb |
var n,l,u:longint;
x:array[1..1 shl 20] of longint;
i:longint;
begin
assign(input,'secv5.in'); reset(input);
assign(output,'secv5.out'); rewritE(output);
readln(n,l,u);
for i:=1 to n do
readln(x[i]);
writeln(0);
close(input);
close(output);
end.