比赛代码 - COGS

比赛	NOIP_1	评测结果	WAAWW
题目名称	画海岛地图	最终得分	20
用户昵称	Achilles	运行时间	0.000 s
代码语言	Pascal	内存使用	0.00 MiB
提交时间	2008-09-03 21:45:30

显示代码纯文本

begin
  assign(output,'island.out');
  rewrite(output);
  writeln('1');
  writeln('****');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('2');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('****');
  writeln(' ****');
  writeln('****');
  close(input);
end.