Рабочие листы
к вашим урокам
Скачать
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
А>B
C>D
D:=A
D:=B
D:=C
да
нет
да
нет
8 слайд
Задача 1. Из двух чисел выбрать меньшее.
Вывести его на экран.
Исходные числа вводить с клавиатуры.
Program MID_1;
Var A,B,C:real; {вещественный тип}
Begin
readln(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
Рабочие листы
к вашим урокам
Скачать
6 661 432 материала в базе
Настоящий материал опубликован пользователем Мосейчук Виталий Васильевич. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
500/1000 ч.
Курс повышения квалификации
36 ч. — 180 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
600 ч.
Мини-курс
3 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.