Алгоритм реализуемый инструкцией ifthen Например инструкция
Рисунок 2.3. Алгоритм, реализуемый инструкцией if-then Например, инструкция
if n=m
then c:=c+l;
увеличивает значение переменной с только в том случае, если значения переменных n и m равны.
В качестве примера использования инструкции if рассмотрим программу вычисления стоимости междугородного телефонного разговора.
Как известно, стоимость междугородного разговора по телефону в выходные дни ниже, чем в обычные. Программа, текст которой приведен в листинге 2.1, запрашивает длительность разговора и день недели, а затем вычисляет стоимость разговора. Если день недели — суббота или воскресенье, то стоимость уменьшается на величину скидки. Цена минуты разговора и величина скидки задаются в тексте программы как константы. Вид диалогового окна программы приведен на Рисунок 2.4.
Для ввода исходных данных (длительность разговора, номер дня недели) используются поля редактирования, для вывода результата и пояснительного текста — поля меток. В табл. 2.3 перечислены компоненты и указано их назначение, а в табл. 2.4 приведены значения свойств этих компонентов.
