记录编号	12963	评测结果	AAAAA
题目名称	380.硬币翻转	最终得分	100
用户昵称	.Xmz	是否通过	通过
代码语言	Pascal	运行时间	0.001 s
提交时间	2009-09-24 19:06:39	内存使用	0.11 MiB

program xmz;
var
 f1,f2:text;
 n,a,b,x:integer;
begin
 assign(f1,'coinn.in');assign(f2,'coinn.out');
 reset(f1);rewrite(f2);
 read(f1,n);
 writeln(f2,n);x:=1;
 for a:=1 to n do
  begin
  x:=1-x;
  for b:=1 to n do
   begin
    if b<=a then write(f2,x)
    else write(f2,1-x);
   end;
   writeln(f2);
  end;
 close(f1);close(f2);
end.