Default case branch as part of the case ...
otherwise statement:
case expression of
selector: statement;
...
selector: statement
otherwise { ``else'' instead of ``otherwise'' is allowed }
statement;
...
statement
end
Use in a structured value of array type:
[index1: value1; index2: value2
otherwise value_otherwise]
otherwise starts a series of statements which is executed if no
selector matches expression. In this situation, else is a
synonym for otherwise.
otherwise also defines the default value in an Extended Pascal structured values of array type.
otherwise is an ISO 10206 Extended Pascal extension.
program OtherwiseDemo;
var
i: Integer;
a: array [1 .. 10] of Integer value [1: 2; 4: 5 otherwise 3];
begin
for i := 1 to 10 do
case a[i] of
2: WriteLn ('a[', i, '] has value two.');
3: WriteLn ('a[', i, '] has value three.');
otherwise WriteLn ('a[', i, '] has neither value two nor three.')
end
end.