显示简单图形

program Project1;

{$APPTYPE CONSOLE}
begin
  Writeln('   |   |   ');
  Writeln('  x|   |   ');
  Writeln('---|---|---');
  Writeln('   | 0 |x  ');
  Writeln('---|---|---');
  Writeln('   | 0 |   ');
  Writeln('   |   |   ');
  Readln;
end.
原文地址:https://www.cnblogs.com/del/p/968762.html