Множественный выбор (выбор одного действия из нескольких возможных) осуществляется при помощи вложенных инструкций if.
Приведенные ниже инструкции показывают, как можно реализовать выбор одного действия из четырех возможных вариантов.
if условие1 then
// здесь инструкции, которые будут выполнены,
// если условие1 истинно
else
if условие2 then
// здесь инструкции, которые будут выполнены,
// если уловие1 ложно, а условие2 истинно
else
if условие3 then
// здесь инструкции, которые будут выполнены,
// если условия условие1 и условие2 ложны, а условие3 истинно
else
// здесь инструкции, которые будут выполнены,
// если ни одно из условий условие1, условие2 или условие3
// НЕ выполняется
end;
end;
end;
Пример:
if n = 1 then
material :='Алюминий';
density := 2.7;
else
if n = 2 then
material :='Медь';
density := 8.9;
else
if n = 3 then
material :='Сталь';
density := 7.856;
else
material :='Пластик';
density := 1.9;
end;
end;
end;