Программирование разветвляющихся алгоритмов. Простой и составной условные операторы

Июль 24, 2022

Главная
Информатика
Программирование разветвляющихся алгоритмов. Простой и составной условные операторы

Содержание

2. Линейные алгоритмы Линейным называется алгоритм, в котором используется всего одна конструкция – следование. Он состоит из
3. Типы данных в языке Pascal Типы данных Числовые: byte; integer; real. Символьный: char. Строковый: string. Логический:
5. Разветвляющиеся алгоритмы В разветвляющихся алгоритмах, помимо следования, используется конструкция ветвления. Ветвление – это алгоритмическая конструкция, в
6. Блок-схема разветвляющегося алгоритма Условие Ветвь 1 Ветвь 2 Да Нет
7. Запись разветвляющегося алгоритма в языке Pascal Формы записи условного оператора Сокращённая: if then ; Полная: else
8. Составной условный оператор If then else begin ; ; … end begin ; ; … end;
9. Задача Три отрезка заданы своими длинами. Определить, образуют ли эти отрезки треугольник, и если образуют, то
10. Задача Три отрезка заданы своими длинами. Определить, образуют ли эти отрезки треугольник, и если образуют, то
11. Блок-схема алгоритма: Начало a, b, с a > b a > c b > c p:=с
12. Блок-схема алгоритма: Да Нет
14. Написание программы program treugolnik; var a, b, c, p: real; begin writeln ('Программа проверки того, образуют
15. Программирование разветвляющихся алгоритмов. Простой и составной условные операторы В разветвляющемся алгоритме используются ветвления. Ветвление – это
17. Скачать презентацию

Слайд 2

Линейные алгоритмы
Линейным называется алгоритм, в котором
используется всего одна конструкция –

следование. Он состоит из операторов,
записанных последовательно в порядке их исполнения.

Слайд 3

Типы данных
в языке Pascal
Типы данных
Числовые:
byte;
integer;
real.
Символьный:
char.
Строковый:
string.
Логический:
boolean.

Слайд 4

Слайд 5

Разветвляющиеся алгоритмы
В разветвляющихся алгоритмах, помимо следования,
используется конструкция ветвления.
Ветвление – это алгоритмическая

конструкция, в
которой в зависимости от некоторого условия
происходит исполнение одной из двух
последовательностей команд (ветвей).

Слайд 6

Блок-схема
разветвляющегося алгоритма
Условие
Ветвь 1
Ветвь 2
Да
Нет

Слайд 7

Запись разветвляющегося
алгоритма в языке Pascal
Формы записи
условного оператора
Сокращённая:
if
<условие>
then
<оператор 1>
;
Полная:
else
<оператор 2>
if
<условие>
then
<оператор 1>
;

Слайд 8

Составной условный оператор
If <условие>
then
else
begin
<оператор 1>;
<оператор 2>;
…
end

begin
<оператор 3>;
<оператор 4>;
…
end;

if <условие 2>
then <оператор 1>
else <оператор 2>;

Вложенный условный оператор

Слайд 9

Задача
Три отрезка заданы своими длинами.
Определить, образуют ли эти отрезки треугольник,

и если образуют, то какой:
остроугольный, прямоугольный или тупоугольный.

с < a + b

Слайд 10

Задача
Три отрезка заданы своими длинами.
Определить, образуют ли эти отрезки треугольник,

и если образуют, то какой:
остроугольный, прямоугольный или тупоугольный.

Прямоугольный треугольник

= 90º

с2 = a2 + b2

Тупоугольный
треугольник

> 90º

с2 > a2 + b2

Остроугольный
треугольник

< 90º

с2 < a2 + b2

Слайд 11

Блок-схема алгоритма:
Начало
a, b, с
a > b
a > c
b > c
p:=с
c:=a
a:=p
p:=с
c:=b
b:=p
Да
Да
Да
Нет
Нет
Нет

Слайд 12

Блок-схема алгоритма:
Да
Нет

Слайд 13

Слайд 14

Написание программы
program treugolnik;
var
a, b, c, p: real;
begin
writeln ('Программа проверки

того, образуют ли 3 заданных отрезка треугольник. Введите длины отрезков.');
readln (a, b, c);
if a>b
then if a>c
then begin
p:=c;
c:=a;
a:=p;
end
else if b>c
then begin

p:=c;
c:=b;
b:=p;
end;
if c then if sqr(c)=sqr(a)+sqr(b)
then write ('Заданные отрезки образуют прямоугольный треугольник.')
else if sqr(c)>sqr(a)+sqr(b)
then write ('Заданные отрезки образуют тупоугольный треугольник.')
else write ('Заданные отрезки образуют остроугольный треугольник.')
else write ('Заданные отрезки не образуют треугольник.');
end.

Исходный код программы

Слайд 15