Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Лекция 03 Создание приложенийl (1540916)

.pdf
Скачиваний:
6
Добавлен:
09.03.2016
Размер:
2.96 Mб
Скачать

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

If условие then действие;

If X > 0 then X: = 0;

51

Оператор выбора if … then … else

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

else

оператор 2;

Оператор выбора

If условие then

{группа операторов}

else

{группа операторов};

Операторы выбора

If условие then

begin группа операторов end

else

begin группа операторов end;

Пример

a, b

да

a < b

нет

 

 

 

 

 

 

 

 

c = a

 

 

 

c = b

 

 

 

 

 

c

If a < b then

c := a else

c := b;

Операторы выбора с условием равенства

If age = 20 then

оператор;

Операторы выбора с условиями неравенства

If age >= 20 then

writeln(‘Возраст больше или равен

20’);

Условие с использованием логического «И»

If (a <= b) and (d = 45) then begin

// Операторы

end;

Условие с использованием логического «ИЛИ»

If (k = 34) or (n > 23.7) then begin

// Операторы

end;

Проблемы использования if-if-else

test := 100;

Cod:=‘B’;

if (test >= 100) then if (cod = ‘A’) then

writeln (‘Ответ 1’);

else

writeln (‘Ответ 2’);