- •Основы и принципы работы в vba
- •Часть 1 омск 2008
- •Часть 1
- •1.1. Краткие теоретические сведения
- •1.2. Индивидуальные задания Задание 1.
- •1) Изучить правила записи констант, переменных, стандартных функций и арифметических выражений.
- •Выражения, записанные на языке Visual Basic
- •2.1. Краткие теоретические сведения
- •2.2. Индивидуальные задания
- •Программа вычислений имеет вид:
- •2.3. Дополнительное задание
- •3.1. Краткие теоретические сведения
- •3.2. Индивидуальные задания
- •3.2.1. Примеры проверки числа на кратность
- •3.2.2. Использование линейной формы записи операторов
- •4.1. Краткие теоретические сведения
- •Блок операторов 1
- •4.2. Индивидуальные задания
- •4.2.1. Простое ветвление. Логические операции
- •4.2.2. Сложное ветвление
- •Данные для вычисления функции у с использованием условного оператора
- •4.2.3. Задания на использование оператора выбора Select Case
- •4.3. Дополнительное задание
- •Типы данных vba
- •Часть 1
- •644046, Г. Омск, пр. Маркса, 35
4.2.3. Задания на использование оператора выбора Select Case
Во всех заданиях организовать вывод соответствующего сообщения для случая, если введено число, не предусмотренное программой.
По введенному коду детали (1 – шуруп, 2 – гайка, 3 – винт, 4 – гвоздь, 5 – болт) вывести ее название.
Для введенной в цифровом виде школьной отметки вывести ее словесное описание (1 – «плохо», 2 – «неудовлетворительно», 3 – «удовлетворительно», 4 – «хорошо», 5 – «отлично»).
Для каждой введенной арабской цифры от 1 до 9 вывести соответствующую запись римскими цифрами.
По введенному номеру дня недели выдать в качестве результата расписание занятий на этот день.
По введенному номеру времени года (1 – зима, 2 – весна, 3 – лето, 4 – осень) выдать его название и перечень соответствующих этому времени года месяцев.
По введенному номеру курса N (от 1-го до 5-го) выдать соответствующее сообщение «Привет, N-курсник!», например: «Привет, первокурсник!» при N = 1.
По введенному номеру месяца выдать количество дней в этом месяце (месяцы с одинаковым количеством дней объединить в группы).
По введенному коду единицы измерения (1 – тонна, 2 – центнер, 3 – килограмм, 4 – грамм, 5 – миллиграмм) и массе М выдать соответствующее значение массы в килограммах.
По введенному номеру единицы измерения (1 – километр, 2 – метр, 3 – дециметр, 4 – сантиметр, 5 – миллиметр) и длине отрезка L выдать соответствующее значение длины отрезка в метрах.
По введенному номеру месяца (от 1 до 12) выдать перечень приходящихся на этот месяц праздничных дней (например, если введено число 1, то 1 января – Новый год, 7 января – Рождество).
Пусть элементами круга являются радиус (первый элемент), диаметр (второй элемент) и длина окружности (третий элемент). Составить программу, которая по введенному номеру элемента запрашивает его соответствующее значение и вычисляет площадь круга.
По введенному шифру учебного потока определить название факультета ОмГУПСа, например, поток 46 – электромеханический факультет (формулу для выделения первой цифры шифра составить самостоятельно).
В восточных календарях принят 12-летний цикл. Годы внутри цикла носят названия животных: 1-й – петуха, 2-й – собаки, 3-й – кабана (свиньи), 4-й – крысы, 5-й – вола (быка), 6-й – тигра, 7-й – кролика (кота), 8-й – дракона, 9-й – змеи, 10-й – лошади, 11-й – овцы (козы), 12-й – обезьяны. По введенному четырехзначному году выведите его название в календаре, например: 2007 – год Свиньи. Порядковый номер года в 12-летнем цикле можно определить по формуле: N = остаток (Год / 12).
Составить программу начисления премиальных в зависимости от объема продаж. Формула расчета премии имеет вид:
Премия = Объем продаж Комиссионные проценты.
Данные для выполнения задания представлены в табл. 4.3.
Таблица 4.3
Данные для начисления премиальных
Объем продаж, р. |
Комиссионные, % |
Объем продаж, р. |
Комиссионные, % |
От 3000 до 9999 |
6 |
От 50000 до 100000 |
12 |
От 10000 до 49999 |
9 |
Более 100000 |
14 |
Для целого числа а, которое принимает значение от единицы до 99, напечатать фразу «Мне а лет», учитывая при этом, что при некоторых значениях числа а слово «лет» необходимо заменить на слово «год» или «года», например: 11 лет, 22 года, 51 год.