littletest29.out

来自「格式化源码的最新板」· OUT 代码 · 共 18 行

unit littletest29;

interface

type
  tkirk    = low(integer)..high(integer);
  tspock   = low(integer)..12;
  triker   = 12..high(integer);
  twhorf   = 12..42;
  tdata    = False..True;
  tpicard  = low(boolean)..high(boolean);
  tcrusher = low(boolean)..True;
  tuhura   = False..high(boolean);

implementation

end.