| Тема. Логические величины, операции, выражения. Операторы выбора.
Логические величины, операции, выражения
Логическое выражение - логическая формула, записанная на языке программирования. Логическое выражение состоит из логических операндов. связанных логическими операциями и круглыми скобками. Результатом вычисления является булевая величина, которая, как и переменная логического типа (Boolean), может принимать значения либо true, либо false. При создании логических выражение используются операции отношения (> < >= <= <>) и логические операции (not (не), xor(исключающее или), or (или), and (логическое и)).
Упражнения.
Вычислите значения логических выражений:
1. К mod 7=K div 5-1 при К = 15;
2. t and (P mod 3 = 0) при t = true, P=10101;
3. (x*y<>0) and (y>x) при x=2, y=1;
4. a or not b при a=false, b=true.
Операторы языка
Условный оператор
Условный оператор - позволяет проверять некоторое условие и в зависимости от результатов проверки выполнить то или иное действие; средство ветвления вычислительного процесса.
Общий вид команды ветвления в виде блок-схемы следующий:
Структура:
IF <условие> THEN <оператор1> ELSE<оператор2>, где
-
-
- IF - если
- <условие> - произвольное выражение логического типа;
- <оператор1>, <оператор2> - любые операторы языка Паскаль;
- ELSE - необязательный параметр (иначе).
Пример 5. Найти площадь треугольника. используя формулу Герона, учесть следующие ограничения: стороны треугольника - положительные числа, каждая из сторон меньше суммы двух других.
 |
program pr5;
var a,b,c,p,s: real;
begin
writeln ('Введите длины сторон треугольника');
write(' a= '); readln(a);
write(' b= '); readln(b);
write(' c= '); readln(c);
if (a>0) and (b>0) and (c>0) and (a<=b+c) and (b<=a+c) and (c<=a+b) then
begin
p:= (a+b+c)/2;
s:= sqrt(p*(p-a)*(p-b)*(p-c));
writeln('p = ', p:5:2);
writeln('s = ', s:5:2);
end
else writeln('Неверные исходные данные');
end.
|
Оператор выбора
Оператор выбора - позволяет выбрать одно из нескольких возможных продолжений программы. Параметром, по которому осуществляется выбор, служит ключ выбора.
На языке Паскаль структура имеет следующий вид:
CASE<ключ_выбора> OF<список_выбора> [ELSE<операторы>] END, где
• <ключ_выбора> - ключ выбора;
• <список_выбора> - одна или более конструкций вида:
<константа выбора>:<оператор>;
<константа выбора> - константа того же типа, что и <ключ выбора>
<операторы> - произвольные операторы Паскаль.
Пример 6. Программа при вводе одного из символов y или Y выведет на экран слово ДА, а при вводе n или N - НЕТ.
program pr6;
var cimvol: char;
begin
readln(cimvol);
Case cimvol of
'n','N':writeln('Нет ');
'y','Y':writeln('Да ')
else writeln('Неверные исходные данные');
end
end. |
 |
| |
