Сайт фан клуба ИГХТУ

 

Методичка 706 ИГХТУ

Операции в порядке убывания их приоритета располагаются следующим образом:                                                   

Операция

Приоритет

not

and

or, xor

=, < >, <, >, < =, > =

первый (высший)

второй

третий

четвертый (низший)

Пример логического выражения:

not (ln(x) > 5) and ((a <= 5) or (y = 0.2))

Оператор условия if

Оператор if имеет вид :

if p then a1 else a2;

При выполнении этого оператора сначала вычисляется логическое выражение p (условие), в случае истинности которого выполняется оператор а1, а в случае ложности – оператор а2. Ключевые слова if, then и else имеют смысл если, то и иначе, соответственно.

Возможен сокращенный вариант оператора if:

                  if p then a1;

Здесь, если условие p истинно, выполняется оператор а1. Если условие p ложно, управление передается следующему (за оператором if) оператору в программе. Можно сказать, что первый вариант оператора if осуществляет выбор между двумя действиями, а второй – между действием и отсутствием действия.

Пример использования оператора if:

program sqroot; {Вычисление действительных  корней квадратного уравнения}

var

   a, b, c: real; {коэффициенты уравнения}

   x1, x2: real; {корни уравнения}

   d: real; {дискриминант}

begin

   writeln (’Введите коэффициенты уравнения:’);

   write (’a =’); readln (a);

   write (’b =’); readln (b);

   write (’c =’); readln (c);

   d: = b * b – 4 * a * c; {вычисление дискриминанта}

   if d > = 0

     then

       begin

           x1: = (-b + sqrt(d)) / (2 * a);

           x2: = (-b – sqrt(d)) / (2 * a);

           writeln (’Корни уравнения:’);

           writeln (’ x1= ’, x1 : 9 : 3, ’ x2= ’, x2 : 9 : 3);

       end

     else

       writeln (’Действительных корней нет.’);

end.

 



страницы:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
 
 
 
 
 
 

Warning: in_array() expects parameter 2 to be array, null given in /home/p198609/www/bestlogistics.ru/2f41c03c6df35aa46f8d897a4eed7d02/sape.php on line 192