Иллюстрированный самоучитель по Delphi 7 для начинающих

Выбор. Инструкция if.

Например, если переменная t обозначает тип соединения сопротивлений в электрической цепи (t=1 соответствует последовательному соединению, t=2 – параллельному), a r1 и r2 – величины сопротивлений, то приведенная ниже инструкция if осуществляет выбор формулы, по которой будет выполнен расчет.

if t=1 then
begin
z: = r1+r2;
end
else
begin
z: = (r1+r2)/(r1*r2);
end;

Если в инструкции if между begin и end находится только одна инструкция, то слова begin и end можно не писать.

Например, инструкцию:

if otv=3
then
begin
prav: = prav+1;
end
else
begin
ShowMessage('Ошибка!');
end;

Можно переписать так:

if otv=3 then
prav: = prav+l
else
ShowMessage('Ошибка!');

Если какое-либо действие должно быть выполнено только при выполнении определенного условия и пропущено, если это условие не выполняется, то инструкция if может быть записана так:

if условие then
begin
{ инструкции, которые надо выполнить, если условие выполняется, истинно }
end;

На рис. 2.3 представлен алгоритм, соответствующий инструкции if-then.

Иллюстрированный самоучитель по Delphi 7 для начинающих › Управляющие структуры языка Delphi › Выбор. Инструкция if.
Рис. 2.3. Алгоритм, реализуемый инструкцией if-then

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.