delphi中case of语句怎么使用

在Delphi中，"case of"语句用于根据一个表达式的值选择不同的代码分支。下面是一个示例：

var
  input: Integer;

begin
  Writeln('请输入一个数字：');
  Readln(input);

  case input of
    1:
      Writeln('输入的是1');
    2, 3:
      Writeln('输入的是2或3');
    4..10:
      Writeln('输入的是4到10之间的数字');
    else
      Writeln('输入的是其他数字');
  end;

  Readln;
end.

在上面的代码中，根据用户输入的数字，"case of"语句会选择相应的代码分支进行执行。在每个case后面的常数或范围表示了可能的输入值。如果输入值与某个case匹配，则执行该case后面的代码。如果输入值与所有的case都不匹配，则执行else语句后面的代码（如果存在else语句）。

需要注意的是，case的常数或范围必须是相同的类型，并且不能重复。在上述示例中，1、2、3、4…10都是整数类型。