Оператор выбора, условный оператор в Паскаль

Условный оператор

Если необходимо некоторые команды выполнять при определенных условиях, то условный оператор используется

If <условие> then <оператор>

else <оператор>;

блок-схема:

if

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Пример: Записать программу алгоритма двух чисел.

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;

блок-схема:

case

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Пример: написать программу, которая запрашивает количество стульев в виде числа и выводит количество в словесной форме.

Program Stul;

Var kol:integer;

Begin

WriteLn(‘введите количество стульев’);

ReadLn(kol);

Case kol of

5: WriteLn(‘стулев’);

3: WriteLn(‘стула’);

1: WriteLn(‘стул’);

Else WriteLn(‘таких стульев не бывает’);

End.

. оператор выбора
. case of pascal блок-схема
Комментирование и размещение ссылок запрещено.

Top