Cod sursa(job #66426)

Utilizator alex_mircescuAlex Mircescu alex_mircescu Data 18 iunie 2007 13:26:02
Problema Perle Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
var i,n:longint;
begin
assign(input,'perle.in');
assign(output,'perle.out');
reset(input);
rewrite(output);
readln(n);
randomize;
for i:=1 to n do
  writeln(random(2));
close(input);
close(output);
end.