Условный оператор
Если необходимо некоторые команды выполнять при определенных условиях, то условный оператор используется
If <условие> then <оператор>
else <оператор>;
блок-схема:
Пример: Записать программу алгоритма двух чисел.
Program delenie;
Var a,b : Real;
Begin
WriteLn (‘введите два числа:’);
ReadLn (a,b);
If b=0 Then WriteLn(‘делить на ноль нельзя’);
Else
Begin
x:=a/b;
WriteLn(‘частное равно: ’,x:0:3);
End;
End.
Если в одной из ветвей алгоритма число блоков несколько, тогда в программе соответствующие команды заключаются между Begin и End; .
Оператор выбора
Если необходимо при различных значениях одной и той же переменной выполнять различные действия, в этом случае применяют оператор выбора
Синтаксис:
Case <имя переменной> of
<вариант 1><оператор 1>;
……
<вариант z>:<оператор z>;
Else <оператор>;
End;
блок-схема:
Пример: написать программу, которая запрашивает количество стульев в виде числа и выводит количество в словесной форме.
Program Stul;
Var kol:integer;
Begin
WriteLn(‘введите количество стульев’);
ReadLn(kol);
Case kol of
5: WriteLn(‘стулев’);
3: WriteLn(‘стула’);
1: WriteLn(‘стул’);
Else WriteLn(‘таких стульев не бывает’);
End.
. оператор выбора примеры на условный оператор действия условного оператора паскаль оператор выбор паскаль Программа Условный оператор Банкомат