Демонстрационные примеры
1. Даны значения двух величин. Выбрать большее из них. Обозначим данные величины через А и В, результат – С. Приведем блок-схему алгоритма решения этой задачи. Рассмотрим два способа: (a) с использованием полного ветвления; (б) с использованием неполного ветвления. Если логическое условие справедливо, то результатом будет логическая величина True и выполнение алгоритма продолжится по стрелке “истина”; в противном случае логическое выражение примет значение False и выполнение алгоритма пойдет по ветви “ложь”. Соответствующие программы на VBA имеют следующий вид. (а) Sub Большее_из_двух () Dim A As Integer, B As Integer, C As Integer A= Val (InputBox (“Введите число”, ”Ввод числа”)) B= Val (InputBox (“Введите число”, ”Ввод числа”)) If A> =B Then C=A Else C=B End If MsgBox C End Sub
2. Найти наибольшее значение среди трех величин A, B и C. Возникает следующая идея алгоритма решения этой задачи: сначала нужно найти большее значение среди A и B и присвоить его какой-то переменной, например, D. Затем наитии большее среди D и C. Это значение можно присвоить той же переменной D. Решение задачи сводится к двукратному применению уже знакомого алгоритма нахождения большего из двух. Приведем фрагмент программы, реализующей этот алгоритм, с последовательными неполными ветвлениями и сложными логическими выражениями: If (A> =B) And (A> =C) Then D=A If (B> =A) And (B> =C) Then D=B If (C> =A) And (C> =B) Then D=C Эту же задачу можно решить с помощью алгоритма совсем другой структуры, которая представляет собой вложенные ветвления. Написать программный код для решения этой задачи попытайтесь самостоятельно.
|