>
Мають один і той же пріоритет і з'єднують два висловлення одного й того ж типу. Результатом будь-якої операції порівняння є значення TRUE або FALSE.
ЛОГІЧНІ ОПЕРАЦІЇ :: NOT - НЕ; AND - І; OR - АБО
ПОРЯДОК ВИКОНАННЯ ОПЕРАЦІЙ:
1. - (Унарний мінус, тобто заперечення числа) NOT
2. */DIV MOD AND
3. + - OR
4. <<=>> == <> br/>
Оператор розгалуження (умовний оператор)
Формат оператора:
If умова THEN
оператор1
ELSE оператор2;
де умова - логічне вираження (тобто в нього обов'язково входить знак відносини, і можна визначити, істинно вираз або хибно)
оператор1 - будь-який оператор Паскаля; цей оператор виконується, коли умова істинно;
оператор2 - будь-який оператор Паскаля, в тому числі і умовний; цей оператор виконується, коли умова помилково.
Виконання оператора:
При виконанні цього оператора спочатку обчислюється значення умови. p> Якщо умова істинно (true), то виконується оператор після слова THEN, а оператор2 пропускається;
якщо умова хибно (false), то оператор1 пропускається, а виконується оператор після слова ELSE. p> Приклади:
if x> 0 then
y: = sqrt (x
else write ('Рішень немає');
Оператори 1 і 2 можуть бути будь-якими, в тому числі і умовними. У цьому випадку їх називають вкладеними. p> Приклади:
if x> 0 then
y: = sqrt (x
else
if x <= -3 then
y: = sqr (x)
else write ('Рішень немає');
Коротка форма умовного оператора
Частини ELSE оператор2 може і не бути, тоді формат оператора:
If умова THEN оператор1;
Виконання оператора:
Якщо умова істинно, то виконується оператор після слова THEN, а інакше він пропускається.
Приклади:
if abs (x)> = 5 then
y: = exp (3 * ln (x))
Складовою оператор
В умовному операторі після слів THEN і ELSE можна поміщати по кілька операторів. У цьому випадку їх треба об'єднати в складений оператор, який починається словом BEGIN і закінчується словом END; (на кінці не крапка, а крапка з комою!)
Приклади
Скласти програму, яка перерозподілить задані значення x, y так, що в х виявиться більшого значення, а в y - менше.
program PRMAX;
var x, y, z: real;
begin
write ('Введіть два числа:');
read (x, y);
if x
begin z: = x;
x: = y;
y: = z
end;
writeln ('x = ', X,' y = ', y);
end.
Складне умова
Після слова IF допускається:
кон'юнкція умов (умови зв'язуються за допомогою логічної операції and),
диз'юнкція умов (умови зв'язуються за допомогою логічної операції or);
інверсія умов (заперечення умови not)
Приклади:
З'ясувати, чи належить точка з координатами (x, y) кільцю з центром у точці (0, 0), зовнішнім радіусом r1 і внутрішнім радіусом r2
program PRcir;
var x, y, r1, r2: real;
begin
write ('Введіть координати точки:');
read (x, y);
writeln ('Введіть радіуси r1, r2 ::');
read (r1, r2);
if (Sqrt (sqr (x) + sqr (y)) r2) then
writeln ('Точка належить кільцю');
else writeln ('Точка не належить кільцю');
end.
