Файл: Программирование разветвляющихся алгоритмов оператором выбора.doc

Практическая работа № 9

Тема : Программирование разветвляющихся алгоритмов оператором выбора

Цель: 1. Изучить языковые конструкции операторов условия Delphi.

2. Углублять навыки работы в среде программирования Delphi.

3. Развивать навыки и приемы управления компонентами среды Delphi

Краткая теоретическая часть

Оператор case

Используется вместо нескольких вложенных операторов if для программирования алгоритма, который разветвляется на любое количество ветвей. В общем случае оператор case записывается так:

case селектор of список1:оператор1; список2:оператор2; . . . списокn:операторn else оператор; end;

Здесь использованы следующие обозначения: селектор – переменная или выражение одного из следующих типов: целого, символьного, логического, интервального или перечисляемого; список1..списокn – значения, которые принимает селектор. Значения отделяются друг от друга запятыми.

Оператор case выполняется следующим образом. Вначале вычисляется значение селектор. Если результат его вычисления равен одному из значений список1, тогда выполняется оператор1. Если результат вычисления селектор равен одному из значений список2, выполняется оператор2 и т.д. Если же результат вычисления селектора не равен ни одному из значений список1 . . списокn, то выполняется оператор, расположенный после слова else. Обращаем внимание на то, что перед словом else символ ; (точка с запятой) не ставится!

В операторе case, так же как и в операторе if, ветвь else может отсутствовать.

Задание
Разработать программу, которая реализует указанные алгоритмы задач с помощью оператора выбора (по вариантам).
Вариант 1

1. 
   Написать программу, которая по номеру дня недели (целому числу от 1 до 7) выдает название дня недели словами («понедельник», «вторник» и т.д.). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Написать программу, позволяющую по последней цифре числа определить последнюю цифру его квадрата.
   

---

Вариант 2

1. 
   Написать программу, которая по номеру месяца в году (целому числу от 1 до 12) выдает название времени года словами («весна», «зима» и т.д.). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Дано число. Написать программу, которая запрашивает цифру от 0 до 5 (степень) и возводит это число в указанную степень
   

Вариант 3

1. 
   Написать программу, которая по номеру месяца в году (целому числу от 1 до 12) выдает название этого месяца словами («январь», «февраль» и т.д.). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Дано натурально число. Написать программу, которая проверяет кратность этого числа на 3, 4, 5 и 6 (кратность проверяется остатком от деления на соответствующее число).
   

Вариант 4

1. 
   Написать программу, которая по номеру оценки (целому числу от 1 до 5) выдает пояснение этой оценки словами («плохо», «неудовлетворительно», «удовлетворительно», «хорошо» и «отлично»). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Даны два числа x и y. Арифметические действия над ними пронумерованы (1- сложение, 2- вычитание, 3- умножение, 4-деление, 5- возведение х в степень y). Составить программу, которая по введенному номеру выполняет выбранное действие над числами и выводит результат
   

Вариант 5

1. 
   Написать программу, которая по введенному числу от 1 до 4) выдает соответствующее сообщение «Привет, k-курсник» (например если k=1 , то «Привет, первокурсник», если k=4, то «Привет, четверокурсник»). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Написать программу, позволяющую по последней цифре числа определить последнюю цифру его куба.
   

Вариант 6

1. 
   Написать программу, которая по введенному названию времени годы («зима», «весна», «лето», «осень» ) выдает названия соответствующих этому времени году месяцы словами («январь», «февраль» и т.д.). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Дано число. Написать программу, которая запрашивает цифру от 0 до 5 (множитель) и умножает это число на множитель
   

Вариант 7

1. 
   Написать программу, которая по введенному целому числу k от 1 до 10, печатает фразу «Мне k лет», учитывая при этом, что при некоторых значениях k слово «лет» надо заменить на слово «год» или «года» (1 год, 2 года, 3 года,….5 лет….7 лет и т.д.). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Дан радиус окружности. Арифметические действия над ним пронумерованы (1- вычисление площади круга, 2- вычисление длины окружности). Составить программу, которая по введенному номеру выполняет выбранное действие и выводит результат
   

---

Вариант 8

1. 
   Написать программу, которая по введенному числу от 1 до 11) выдает соответствующее сообщение «Я k-классник» (например если k=1 , то «Я первоклассник», если k=4, то «Я четвероклассник»). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Дано натурально число. Написать программу, которая проверяет кратность этого числа на 2, 7, 8 и 9 (кратность проверяется остатком от деления на соответствующее число).
   

Вариант 9

1. 
   Написать программу, которая для каждой введенной цифры (от 0 до 9) выводит соответствующее ей название на английском языке (0 –zero, 1- one, 2- two,…). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Даны два катета прямоугольного треугольника. Арифметические действия над ним пронумерованы (1- вычисление площади, 2- вычисление периметра). Составить программу, которая по введенному номеру выполняет выбранное действие и выводит результат
   

Вариант 10

1. 
   Написать программу, которая по введенному номеру месяца (от 1 до 12) выводит количество дней в этом месяце (28, 30 или 31). Ввод выполнить с помощью окна запроса сообщения.
   
2. 
   Даны ширина (х) и длина (у) прямоугольника. Арифметические действия над ними пронумерованы (1- периметр, 2- площадь). Составить программу, которая по введенному номеру выполняет выбранное действие над числами и выводит результат .
   

Порядок выполнения работы

1. 
   Разработать форму приложения . каждое задание оформить в отдельные проекты.
   

2. 
   Предусмотреть наличие кнопок для выхода из приложения и для очистки окон
   

Вычислить значение выражения (1), если x целое:

(1)

На рис. 1 приведен фрагмент блок-схемы алгоритма, который выполняет необходимые действия.


Рис. 1. Фрагмент блок-схемы алгоритма вычисления выражения (1)

Фрагмент кода процедуры с помощью операторов IF и CASE

if (1 then f:=alpha else if x<=10 then f:=2*alpha else if x<=15 then f:=3*alpha else f:=4*alpha;

case x of 1..5: f:=alpha; 6..10: f:=2*alpha; 11..15: f:=3*alpha else f:=4*alpha; end;

3. 
   Сохранить проект
   

---

Содержание отчета

1. 
   Тема
   
2. 
   Цель
   
3. 
   Код программы (без формы)
   

Контрольные вопросы

1. 
   Какие операторы условия существуют.
   
2. 
   В каких случаях предпочтительнее использовать тот или иной оператор. Чем они отличаются.
   
3. 
   Опишите синтаксис оператора выбора.
   
4. 
   С помощью какого оператора можно реализовать вложенные условия.
   

---