Рабочие листы
к вашим урокам
Скачать
1 слайд
ПРОГРАММИРОВАНИЕ РАЗВЕТВЛЯЮЩИХСЯ АЛГОРИТМОВ
НАЧАЛА ПРОГРАММИРОВАНИЯ
2 слайд
Ключевые слова
условный оператор
неполный условный оператор
составной оператор
вложенные ветвления
3 слайд
Общий вид условного оператора
Перед else знак «;» не ставится.
Полная форма условного оператора:
if <условие> then <оператор_1> else <оператор_2>
Неполная форма условного оператора:
if <условие> then <оператор>
Операции
отношений
Логические
операции
Простые
Сложные
Условия - логические выражения
!
4 слайд
Условный оператор
program n_9;
var x, a, b: real;
begin
writeln ('Определение принадлежности
точки отрезку');
write ('Введите а, b>>');
readln (a, b);
write ('Введите x>>');
readln (x);
if (x>=a) and (x<=b) then
writeln ('Точка принадлежит отрезку')
else writeln ('Точка не принадлежит отрезку')
еnd.
a, b, x
(x>=a) and (x<=b)
ДА
НЕТ
да
нет
5 слайд
Неполный условный оператор
program n_10;
var y, a, b, c: integer;
begin
writeln ('Нахождение наибольшей из трёх величин');
write ('Введите а, b, с>>');
readln (a, b, c);
y:=a;
if (b>y) then y:=b;
if (c>y) then y:=c;
writeln ('y=', y)
end.
Y:=A
B>Y
Y:=B
Y:=C
C>Y
да
нет
да
нет
6 слайд
Составной оператор
В условном операторе и после then, и после else
можно использовать только один оператор.
Если в условном операторе после then или после else
нужно выполнить несколько операторов, то
используют составной оператор – конструкцию вида:
begin <последовательность операторов> end
7 слайд
Блок-схема решения КВУР
Конец
Вывод
«Корни уравнения:
х1=», х1, «х2=», х2
х1:=(-b+sqrt(d))/2/a
Начало
Введите коэффициенты a, b, 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:9:3);
writeln ('x2=', x2:9:3)
end
begin
x:=-b/2/a;
writeln ('Корень уравнения x=', x:9:3)
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 ('Корней нет')
else
if d=0 then
else
end.
9 слайд
Вложенные ветвления
if <условие1> then
if <условие2> then <оператор1>
else <оператор2>
else <оператор3>
else всегда относится к ближайшему оператору if
!
10 слайд
Решение линейного уравнения
program n_12;
var a, b, x: real;
begin
writeln ('Решение линейного уравнения');
write ('Введите коэффициенты a , b>>');
readln (a, b);
if a<>0 then
begin
x:=-b/a;
writeln ('Корень уравнения x=', x:9:3)
end
else if b<>0 then writeln ('Корней нет')
else writeln ('x – любое число');
end.
Корней нет
Список данных
a, b, x - вещ
a, b
a<>0
x:=-b/a
b<>0
Любое число
нет
да
да
нет
11 слайд
Самое главное
При записи на языке Паскаль разветвляющихся алгоритмов используют условный оператор:
if <условие> then <оператор_1> else <оператор_2>
Для записи неполных ветвлений используется неполный условный оператор:
if <условие> then <оператор>
Если при некотором условии требуется выполнить определённую последовательных операторов, то их объединяют в один составной оператор, имеющий вид:
begin <последовательность операторов> end
12 слайд
Вопросы и задания
Как на языке Паскаль записывается полное и неполное
ветвление?
Является ли условным оператором последовательность символов?
а) if x<y then x:=0 else read (y)
б) if x>=y then x:=0; y:=0 else write (z)
в) if x<y <z then a:=a+1
Что такое составной оператор?
Для чего он используется в условном операторе?
Используя составной оператор, упростите следующий фрагмент программы:
if a>b then c:=1;
if a>b then d:=2;
if a<=b then c:=3;
if a<=b then d:=4
Дано трёхзначное число.
Напишите программу, которая определяет:
есть ли среди цифр заданного целого трёхзначного числа одинаковые;
является ли число «перевёртышем», т. е. числом, десятичная запись которого читается одинаково слева направо и справа налево.
Даны две точки в плоской прямоугольной системе координат. Напишите программу, определяющую, которая из точек находится ближе к началу координат.
Даны три натуральных числа. Напишите программу, определяющую, существует ли треугольник с такими длинами сторон.
Если такой треугольник существует, то определите его тип (равносторонний, равнобедренный, разносторонний).
Имеются данные о количестве полных лет трёх призёров спартакиады.
Напишите программу, выбирающую и выводящую возраст самого младшего призёра.
Напишите программу, определяющую, лежит ли точка
А(ха, ya):
а) на прямой y = kx + l, над ней или под ней;
Напишите программу, которая производит обмен
значений переменных x и y, если x больше y.
Дан условный оператор:
If a<5 then c:=1
else if a>5 then c:=2
else c:=3
Какое значение имеет переменная а, если в результате выполнения условного оператора переменной с присваивается значение 3?
Напишите программу, вычисляющую значение функции:
-1 при x<0
0 при x=0
1 при x>0
y =
Составьте программу для решения задачи:
Известно, что 31 января 2011 года приходится на понедельник. Какие значения должны быть присвоены литерной переменной y в алгоритме, определяющем день недели для любого числа (chislo) января 2011 года?
chislo:= chislo mod 7
если chislo=3 то у:='…‘
если chislo=4 то у:='…‘
если chislo=5 то у:='…‘
если chislo=6 то у:='…‘
если chislo=0 то у:='…‘
если chislo=1 то у:='…‘
если chislo=2 то у:='…‘
Поле шахматной доски определяется парой натуральных чисел, каждое из которых не превосходит 8.
Напишите программу, которая по введённым координатам двух полей (k, l) и (m, n) определяет, являются ли эти поля полями одного цвета.
Напишите программу, в которой пользователю предлагается дополнить до 100 некоторое целое число а (а - случайное число, меньшее 100).
Ответ пользователя проверяется и комментируется.
13 слайд
Опорный конспект
Условный оператор
if <условие> then <оператор_1> else <оператор_2>
if <условие> then <оператор>
begin <последовательность операторов> end
Полная форма
Неполная форма
Составной оператор
Рабочие листы
к вашим урокам
Скачать
6 665 970 материалов в базе
«Информатика», Босова Л.Л., Босова А.Ю.
§ 3.4. Программирование разветвляющихся алгоритмов
Больше материалов по этой темеНастоящий материал опубликован пользователем Уртенова Олеся Хутовна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
500/1000 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
500/1000 ч.
Мини-курс
2 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.