Cod sursa(job #253959)
| Utilizator |  Ghinea Razvan ShadowHunter |
Data | 6 februarie 2009 13:54:04 |
|---|---|---|---|
| Problema | Caramizi | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Stelele Informaticii 2009, clasele 9-10, ziua 1 | Marime | 0.26 kb |
var f,g:text;
o,t,n,i:longint;
s:string;
begin
assign(f,'episoade.in');reset(F);
assign(g,'episoade.out');rewrite(g);
readln(f,s);
readln(f,t,n);
randomize;
for i:=1 to t do begin
o:=random(2);
writeln(g,o);
end;
close(f);
close(G);
end.
