6 lines
46 B
ObjectPascal
6 lines
46 B
ObjectPascal
var i:integer;
|
|
begin
|
|
case i of;
|
|
end;
|
|
|
|
end. |