这个switch语句怎么实现啊，新手？？？？？？？？？？？

Question

switch ('i % j='+inttostr(i mod j))
  case 0:
  begin
   end;
.
.
.
这个switch语句怎么实现啊，新手

Answer 1

case I of
  1..5: Caption := 'Low';
  6..9: Caption := 'High';
  0, 10..99: Caption := 'Out of range';
else
  Caption := '';
end;

Answer 2

Case (i mod j) of
  0:
  begin
  end;
  else begin
  end;
end;

Answer 3

不用switch吗
直接case (i mod j) of
    0:
    begin
    end;
    1;:
    begin
    end;????????????????????????????

Answer 4

case   (i   mod   j)   of 
        0: 
        begin 
        end; 
        1;: 
        begin 
        end;