Программирование разветвляющихся алгоритмов

Содержание

Слайд 2

Ключевые слова

условный оператор
сокращённая форма условного оператора
составной оператор
вложенные ветвления

Ключевые слова условный оператор сокращённая форма условного оператора составной оператор вложенные ветвления

Слайд 3

Общий вид условного оператора

Перед else знак «;» не ставится.

Полная форма условного оператора:
if

Общий вид условного оператора Перед else знак «;» не ставится. Полная форма
<условие> then <оператор_1> else <оператор_2>

Сокращённая форма условного оператора:
if <условие> then <оператор>

Операции
отношений

Логические
операции

Простые

Сложные

Условия - логические выражения

!

Слайд 4

Условный оператор

program n_9;
var x, a, b: real;
begin
readln (a, b);
readln

Условный оператор program n_9; var x, a, b: real; begin readln (a,
(x);
if (x>=a) and (x<=b) then
writeln ('Точка принадлежит отрезку')
else writeln ('Точка не принадлежит отрезку')
end.

Слайд 5

Сокращённая форма условного оператора

program n_10;
var y, a, b, c: integer;
begin
writeln

Сокращённая форма условного оператора program n_10; var y, a, b, c: integer;
('Нахождение наибольшей из трёх величин');
write ('Введите а, b, с>>');
readln (a, b, c);
y:=a;
if (b>y) then y:=b;
if (c>y) then y:=c;
writeln ('y=', y)
end.

Слайд 6

Составной оператор

В условном операторе и после then, и после else
можно использовать

Составной оператор В условном операторе и после then, и после else можно
только один оператор.

Если в условном операторе после then или после else
нужно выполнить несколько операторов, то
используют составной оператор – конструкцию вида:
begin <последовательность операторов> end

Слайд 7

Блок-схема решения КВУР

Конец

Вывод
«Корни уравнения:
х1=», х1, «х2=», х2

х1:=(-b+sqrt(d))/2/a

да

Начало

Введите коэффициенты a, b,

Блок-схема решения КВУР Конец Вывод «Корни уравнения: х1=», х1, «х2=», х2 х1:=(-b+sqrt(d))/2/a
c

d:=b*b-4*a*c

d < 0

да

Вывод
«Корней нет»

нет

d:= 0

да

x:=-b/2/a

Вывод
«Корень уравнения х=», х

нет

х2:=(-b-sqrt(d))/2/a

Слайд 8

begin
x1:=(-b+sqrt(d))/2/a;
x2:=(-b-sqrt(d))/2/a;
writeln ('Корни уравнения:');
writeln ('x1=', x1);
writeln ('x2=',

begin x1:=(-b+sqrt(d))/2/a; x2:=(-b-sqrt(d))/2/a; writeln ('Корни уравнения:'); writeln ('x1=', x1); writeln ('x2=', x2)
x2)
end;

begin
x:=-b/2/a;
writeln ('Корень уравнения x=', x)
end;

program n_11;
var a, b, c: real;
var d: real;
var x, x1, x2: real;
begin
writeln ('Решение квадратного уравнения');
write ('Введите коэффициенты a, b, c >>');
readln (a, b, c);
d:=b*b-4*a*c;
if d<0 then writeln ('Корней нет');
if d=0 then

if d>0 then

end.

Слайд 9

Самое главное

При записи на языке Паскаль разветвляющихся алгоритмов используют условный оператор:
if <условие>

Самое главное При записи на языке Паскаль разветвляющихся алгоритмов используют условный оператор:
then <оператор_1> else <оператор_2>
Для записи неполных ветвлений используется сокращённый условный оператор:
if <условие> then <оператор>
Если при некотором условии требуется выполнить определённую последовательных операторов, то их объединяют в один составной оператор, имеющий вид:
begin <последовательность операторов> end.

Слайд 12

Домашнее задание

Домашнее задание

Слайд 13

Домашнее задание

Домашнее задание

Слайд 14

Домашнее задание

Домашнее задание
Имя файла: Программирование-разветвляющихся-алгоритмов.pptx
Количество просмотров: 30
Количество скачиваний: 0