子界类型有点不明白?

Question

type
  MyEnum=(Red,Green,Blue,Yellow,Black,White);//这里有什么用,这不
  是定义了一个枚举类型吗?
  MySub1=Blue..Black;//这是定义一个子界类型,是不是里面就有blue,yellow,black三个元素?
 var
 s1:MySub1;
begin
  { TODO -oUser -cConsole Main : Insert code here }
   s1:=Black;
   writeln(ord(s1)); //writeln是做什么的,?

Answer 1

另外还有一点不知道?
 writeln('其平方根:',squareroot:11:3)
11:3这又是怎么回事?

Answer 2

writeln('其平方根:',squareroot:11:3)  ，你看一下帮助，应该是浮点数转成字符时，字符长度为11(包括小数位)，小数位为3怎么自己不试一下结果，运行一下程序不就知道是干什么用的，可能同志不知道怎么玩这个WriteLn，添一下代码
procedure TForm1.Button1Click(Sender: TObject);
var
  squareroot:Real;
  LogF:TextFile;
  sPath:String;
  F:real;
begin
  spath :='C:\Log.txt';//Sysutils.ExtractFilePath(ParamStr(0));
  AssignFile(LogF,spath);
  if not Sysutils.FileExists( spath+'Log.txt') then
    ReWrite(LogF)
  else
    Reset(LogF);
  Append(LogF);
  F :=44.33 ;
  Writeln(LogF,F:11:3);
  CloseFile(LogF);
end;

Answer 3

writeln(ord(s1))这个是显示子界类型的值

Answer 4

writeln用来写入文件,squareroot:11:3表示占位符,为11个,小数位占3个