Цель работы
Научиться решать задачи с разветвляющейся алгоритмической структурой в системах объектно-ориентированного программ-мирования.
Задание
Разработать проект, который позволит вводить данные через текстовый бокс, обрабатывать их с помощью операторов полного и неполного ветвления и выводить результат в окне.
Вы идете в гости и вам необходимо перевязать коробку с подарком лентой. Известно, что на бантик уйдёт ровно 40 см. Составьте алгоритм и программу, определяющие, хватит ли ленты с длиной d см?
Исходные данные: a, b, c – длина, ширина и высота коробки в см. Вводятся в текстовых боксах. Результат вывести в окне.
Разветвляющиеся алгоритмы.ppt
Разветвляющиеся алгоритмы
MICROSOFT
VISUAL BASIC2008
РАЗВЕТВЛЯЮЩИ
РАЗВЕТВЛЯЮЩИ
ЕСЯ АЛГОРИТМЫ
ЕСЯ АЛГОРИТМЫ
Разветвляющиеся алгоритмы
ЦЕЛЬ РАБОТЫ
Научиться
с
разветвляющейся алгоритмической структурой в
системах объектноориентированного програм
мирования.
решать
задачи
ЗАДАНИЕ
через
данные
Разработать проект, который позволит
вводить
бокс,
обрабатывать их с помощью операторов полного и
неполного ветвления и выводить результат в
окне.
текстовый
Разветвляющиеся алгоритмы
Да
условие
Нет
оператор
оператор
оператор
оператор
оператор
IF условие THEN
операторы
END IF
НЕПОЛНОЕ
ВЕТВЛЕНИЕ
Разветвляющиеся алгоритмы
Да
условие
Нет
оператор
оператор
оператор
оператор
оператор
оператор
оператор
оператор
оператор
оператор
IF условие THEN
операторы
ELSE
операторы
END IF
ПОЛНОЕ
ВЕТВЛЕНИЕ
Разветвляющиеся алгоритмы
ЗАДАЧА «РАВНЫ ЛИ ЧИСЛА?»
Ввести 2 целых числа и определить, равны ли
они.
начало
начало
a, b
a=b
да
Не равны
нет
Равн
ы
конец
конец
Dim a, b As Integer
а = Val (TextBox1.Text)
b = Val (TextBox2.Text)
IF a=b THEN
MessageBox.Show
("Равны", "Ответ")
ELSE
MessageBox.Show
(«Не равны", "Ответ")
END IF
Разветвляющиеся алгоритмы
ЗАДАЧА «ЗНАК ЧИСЛА»:
Составьте алгоритм и программу,
определяющие, каким является
введённое число: положительным,
отрицательным или равным нулю.
Решение представить с неполным и
Решение представить с неполным и
полным ветвлением.
полным ветвлением.
Разветвляющиеся алгоритмы
АЛГОРИТМ С НЕПОЛНЫМ
ВЕТВЛЕНИЕМ
начало
начало
ввод А
Да
А=0
Нет
Да
А>0
Нет
равно 0
положитное
ПРОГРАММА:
конец
конец
Да
А<0
Нет
отрицатное
Разветвляющиеся алгоритмы
АЛГОРИТМ С
ПОЛНЫМ
ВЕТВЛЕНИЕМ:
ПРОГРАММА:
Dim a As Single
а = Val (TextBox1.Text)
IF А>0 THEN
MessageBox.Show
("Положительное", "Ответ")
ELSE
IF А<0 THEN
MessageBox.Show
(“Отрицательное", "Ответ")
ELSE
MessageBox.Show (“Равно
нулю", "Ответ")
END IF
END IF
Просмотр
Просмотр
Разветвляющиеся алгоритмы
ЗАДАЧА «ПОДАРОК»:
Вы идете в гости и вам необходимо
перевязать коробку с подарком лентой.
Известно, что на бантик уйдёт ровно 40
см. Составьте алгоритм и программу,
определяющие, хватит ли ленты с
длиной d см?
Исходные данные: aa, , bb, , c c – длина, ширина и
– длина, ширина и
Исходные данные:
высота коробки в см. Вводятся в текстовых
высота коробки в см. Вводятся в текстовых
боксах. Результат вывести в окне.
боксах. Результат вывести в окне.
Разветвляющиеся алгоритмы
Задача «Выражение»:
(ПОВТОРЕНИЕ ТЕМЫ «ЛИНЕЙНЫЕ АЛГОРИТМЫ»)
Составьте алгоритм и программу для
нахождения значения выражения:
у
5
aa
(
)9
Значение а вводится в текстовом боксе.
Значение а вводится в текстовом боксе.
Результат вывести в окне.
Результат вывести в окне.
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.