Описание презентации по отдельным слайдам:
-
1 слайд
Алгоритмы с ветвящейся структурой
Урок программирования в Паскале -
2 слайд
Задача 1. Из двух чисел выбрать большее.
Вывести его на экран.
Исходные числа вводить с клавиатуры.
Блок-схемаСтруктура полное ветвлениеначало
конец
Ввод А, В
Вывод С
А>B
C:=A
C:=B
да
нет
Программа на Паскале
Решение задачи в конструкторе алгоритмов -
3 слайд
начало
Ввод А, В
А>B
C:=A
да
нет
С:=B
Вывод С
конец
Структура неполного ветвления -
4 слайд
Оператор ветвления на Паскале
Если <условие>, то <оператор 1>
иначе <оператор 2>If <условие>, then <оператор 1>
else <оператор 2>;
Например,
If A<B, then C:=A
else C:=B; -
5 слайд
Задача 2. Упорядочить значения двух переменных Х и У по возрастанию
Блок схема.
начало
конец
Ввод X, Y
Вывод X, Y
X>Y
C:=X
X:=Y
Y:=C
нет
да
Решение задачи в конструкторе алгоритмов -
6 слайд
Оператор ветвления на Паскале
Если <условие>, то <оператор >
If <условие>, then <оператор >;
Например,If X>Y, then
begin
C:=X;
X:=Y;
Y:=C;
end;Составной оператор, begin …end операторные скобки
-
7 слайд
Задача 3. Найти наибольшее значение среди
трёх величин А, В, С.
Блок схема. Последовательное ветвлениеначало
конец
Ввод А, В, С
Вывод D
А>BC>D
D:=A
D:=BD:=C
да
нет
да
нет -
8 слайд
Задача 1. Из двух чисел выбрать меньшее.
Вывести его на экран.
Исходные числа вводить с клавиатуры.
Program MID_1;
Var A,B,C:real; {вещественный тип}
Beginreadln(A,B);
If A < B then C:=A
else C:=B;writeln(c);
End.MID_1.pas -
9 слайд
Программирование диалога с компьютером
Program MID_1D;
Var A,B,C:real; {вещественный тип}
Begin
writeln(‘Введите числа А и В для сравнения’);
readln(A,B);
If A < B then C:=A
else C:=B;
writeln(‘Меньшее из чисел равно’, С)
writeln(‘Всего доброго !’);
End.MID_1D.pas -
10 слайд
Домашнее задание
§§ 12, 13, 14; Д/з № 25