Полная (расширенная)форма оператора IF
If логическое выражение Then
оператор 1Else
оператор 2;
Пример:
If AElse X:=b:
Пример 1
Program Pr2;
Var а : Integer;
Begin
WriteLn (‘Введите число’);
ReadLn (а);
If а >5 Then а := а*2;
WriteLn (‘а =', а);
End.
Использование нескольких команд после слов Then и Else
Второй способ реализации ветвления на несколько рукавов – использование нескольких неполных операторов IF
Program Pr6;
Var parol :string;
Begin
WriteLn (‘Какой пароль?’);
ReadLn (parol);
If parol=‘груша’
then
writeLn (‘Доступ для Вас открыт’)
Else
writeLn (‘Доступ закрыт!!!’);
ReadLn;
End.
Сравнение строк на компьютере основано на том, что каждый символ имеет свой АSСII-код, и при сравнении строк сравниваются коды составляющих их символов.
case выражение of
Р1 : <оператор 1>;
P2 : <оператор 2>;
…
Pn : <оператор n>;
[else : <оператор>]
end;
Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:
Email: Нажмите что бы посмотреть