Презентация, доклад по информатике на тему Алгоритмы разветвляющейся структуры, программирование на языке Pascal

из них.
Идея решения: надо вывести на экран первое число, если оно больше второго, или второе, если оно больше первого.
Особенность: действия исполнителя зависят от некоторых условий (если … иначе …).

Алгоритмы, в которых последовательность шагов зависит от выполнения некоторых условий, называются разветвляющимися.

ИНАЧЕ действие2
3. Команда №2
Конец

end
else begin
{что делать, если условие неверно}
end;

Особенности:
перед else НЕ ставится точка с запятой
вторая часть (else …) может отсутствовать (неполная форма)
если в блоке один оператор, можно убрать слова begin и end

>= = <>
Сложное условие – это условие, состоящее из нескольких простых условий (отношений), связанных с помощью логических операций:
not – НЕ (отрицание, инверсия)
and – И (логическое умножение, конъюнкция, одновременное выполнение условий)
or – ИЛИ (логическое сложение, дизъюнкция, выполнение хотя бы одного из условий)
xor – исключающее ИЛИ (выполнение только одного из двух условий, но не обоих)

равно

не равно

>=, =, <>
Особенность – каждое из простых условий обязательно заключать в скобки.
Пример

4 1 6 2 5 3

if not (a > b) or (c <> d) and (b <> a)
then begin
...
end

y=12*x*x
иначе
y=3*x-x*x*x;
Вывод у;
Конец.

Функция задана двумя различными аналитическими выражениями на двух участках координатной оси.
Если х<=16, то у=12*х*х.
Если же х>16, то у=3*х-х*х*х.
Второе неравенство является противоположным первому, поэтому достаточно поставить одно первое условие.

Алгоритм

);
if x >= 16 then
у:=12*х*х
else
у:=3*х-х*х*х;
writeln ('у=‘, у);
end.

a,b,c ;
Если a=b и b=c то
вывод (треугольник равносторонний)
иначе
вывод (треугольник неравносторонний);
Конец.

Треугольник является равносторонним, если все стороны равны между собой.

Алгоритм

( a,b,c );
if (a=b) and (b=c) then
writeln('треугольник равносторонний')
else
writeln('треугольник неравносторонний');
end.

c?

a>=b

b>a

a>=b
a>=c

c>a>=b

c>b>a

b>a
b>=c

max:=a

max:=c

max:=b

max:=c

вывод
max

c');
read ( a,b,c );
if a>=b then
if a>=c then
max:=a
else
max:=c
else
if b>=c then
max:=b
else
max:=c;
writeln (max);
end.