Согласно приоритету операций, слева направо, с учетом скобок 2 страница

Вариации вопросов, описанных в файле «test-2полный»

01а. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка названия городов, а среди городов – в алфавитном порядке Фамилий. Номер записи, содержащей запись "г. Минск, Фамилия – Шайкин", после сортировки, введите в ответ теста.	· Открыть таблицу «Покупатели» в режиме «Конструктор: нажать на название таблицы «Покупатели» правой клавишей мыши, выбрать «Конструктор»; · Выделить строку «Город», чтобы напротив неё появилась стрелка и перетянуть выше, поставив перед строкой «Фамилия»; · Перейти в «Режим таблицы»: правой клавишей на строку названия, выбрать «Режим таблицы» · Выделить поля «Город» и «Фамилия»; Записи/Сортировка/Сортировка по возрастанию. · Ответ: 141.
01б. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка названия городов, а среди городов – в алфавитном порядке Фамилий. Номер записи, содержащей запись "город – Санкт-Петербург, Фамилия – Петрова", после сортировки, введите в ответ теста.	· Открыть таблицу «Покупатели» в режиме «Конструктор: нажать на название таблицы «Покупатели» правой клавишей мыши, выбрать «Конструктор»; · Выделить строку «Город», чтобы напротив неё появилась стрелка и перетянуть выше, поставив перед строкой «Фамилия»; · Перейти в «Режим таблицы»: правой клавишей на строку названия, выбрать «Режим таблицы» · Выделить поля «Город» и «Фамилия»; Записи/Сортировка/Сортировка по возрастанию. · Ответ: 259.
01в. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка названия городов, а среди городов – в алфавитном порядке по Адресам. Номер записи, содержащей адрес "город – Кострома, Главная, 1–19", после сортировки, введите в ответ теста.	· Открыть таблицу «Покупатели» в режиме «Конструктор: нажать на название таблицы «Покупатели» правой клавишей мыши, выбрать «Конструктор»; · Выделить строку «Город», чтобы напротив неё появилась стрелка и перетянуть выше, поставив перед строкой «Адрес»; · Перейти в «Режим таблицы»: правой клавишей на строку названия, выбрать «Режим таблицы» · Выделить поля «Город» и «Адрес»; Записи/Сортировка/Сортировка по возрастанию. · Ответ: 103.
02а. В БД "ФруктыКТ" из вспомогательного материала к тесту, постройте расширенный фильтр для получения информации в таблице Фрукты о фруктах категорий "Сушеные", название которых начинается на букву "а", и все "Свежие". Количество отобранных по фильтру записей введите в ответ теста.	· Открыть таблицу «Фрукты»; · Поставить курсор в первое поле столбца «Категория»; · Записи/Фильтр/Расширенный фильтр; · Первое поле. Поле: Категория. Условия отбора: Свежие ИЛИ (строчка вниз) Сушеные; · Второе поле. Поле: Название фрукта. Условия отбора: ничего не писать ИЛИ (строчка вниз) “а*”. · Правая клавиша мыши/Применить фильтр. · Ответ: 16.
03а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для получения суммы денег, выплаченной за все заказы покупателями из Белоруссии. Полученное в запросе число введите в ответ теста.	· Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицы «Заказы», «Описания заказов», «Наборы». · Первое поле. Поле: Страна (из «Заказы»). Условие отбора: Белоруссия. · Второе поле. Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать «Таблицы», далее нажать «Описания заказов», выбрать «Количество» и дважды по нёму щёлкнуть. Затем набрать знак умножения *. Нажать на «Наборы», выбрать «Цена», дважды щёлкнуть по ней. ОК. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Sum». Ответ: 27480.
04а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для вывода общего количества заказов, сделанных покупателями из Москвы и Минска. Полученное в запросе число введите в ответ теста.	Создание вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицу «Заказы». · Первое поле. Поле: Город (из «Заказы»). Условие отбора: Минск ИЛИ (строчка ниже) Москва. · Второе поле. Поле: Код заказа (из «Заказы»). · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Count». · Сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое поле. Поле: Count-Код заказа. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Sum». · Ответ: 43.
05а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для расчета средней стоимости заказов для всех покупателей. Полученное в запросе число округлите до сотых и введите в ответ теста. Дробную часть числа от целой отделите запятой.	Создание вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицы «Заказы», «Описания заказов», «Наборы». · Первое поле. Поле: Код заказа (из «Заказы»). · Второе поле. Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать «Таблицы», далее нажать «Описания заказов», выбрать «Количество» и дважды по нёму щёлкнуть. Затем набрать знак умножения *. Нажать на «Наборы», выбрать «Цена», дважды щёлкнуть по ней. ОК. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Sum». · Назвать и сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Выражение 1. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Avg». · Назвать и сохранить запрос. · Ответ: 323,88.
05б. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для расчета средней стоимости заказов для покупателей из Белоруссии. Полученное в запросе число округлите до сотых и введите в ответ теста. Дробную часть числа от целой отделите запятой.	Создание вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицы «Заказы», «Описания заказов», «Наборы». · Первое поле. Поле: Страна (из «Заказы»). Условие отбора: Белоруссия. · Первое поле. Поле: Код заказа (из «Заказы»). · Третье поле. Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать «Таблицы», далее нажать «Описания заказов», выбрать «Количество» и дважды по нёму щёлкнуть. Затем набрать знак умножения *. Нажать на «Наборы», выбрать «Цена», дважды щёлкнуть по ней. ОК. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Группировка», для третьего поля – «Sum». · Назвать и сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Выражение 1. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Avg». · Назвать и сохранить запрос. Ответ: 319,53.
06а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для вывода общего количества покупателей из Минска и Москвы. Полученное в запросе число введите в ответ теста.	Создание вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицу «Покупатели». · Первое поле. Поле: Код покупателя (из «Покупатели»). · Второе поле. Поле: Город. Условие отбора: Минск ИЛИ (строчка ниже) Москва. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Count», для второго поля – «Группировка». · Сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое поле. Поле: Count-Код покупателя. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Sum». · Ответ: 32.
07а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для получения количества заказов с суммой, превышающей среднюю стоимость всех имеющихся в наличии заказов. Полученное в запросе число введите в ответ теста.	Создание первого вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицы «Заказы», «Описания заказов», «Наборы». · Первое поле. Поле: Код заказа (из «Заказы»). · Второе поле. Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать «Таблицы», далее нажать «Описания заказов», выбрать «Количество» и дважды по нёму щёлкнуть. Затем набрать знак умножения *. Нажать на «Наборы», выбрать «Цена», дважды щёлкнуть по ней. ОК. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Sum». · Назвать и сохранить запрос. Создание второго вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Выражение 1. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Avg». · Назвать и сохранить запрос. Создание третьего вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить оба ранее созданных запроса. · Первое поле. Поле: Код заказа (из первого запроса). · Второе поле. Поле: Выражение 1 (из первого запроса). Условие отбора: Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать знаки «>» затем нажать «Запросы», далее выбрать второй из созданных запросов, выбрать «Avg-Выражение 1» и дважды по нёму щёлкнуть. ОК. · Назвать и сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее третий из ранее созданных запросов. · Первое и единственное поле. Поле: Код заказа. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Count». · Назвать и сохранить запрос. Ответ: 153.
08а. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка Фамилий покупателей. Номер записи, содержащую запись с фамилией – Шайкин, после сортировки, введите в ответ теста.	· Установить курсор в любую ячейку поля «Фамилия» таблицы «Покупатели» · Записи/Сортировка/Сортировка по возрастанию. · Ответ: 331.
08б. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка Фамилий покупателей. Номер записи, содержащую запись с фамилией – Сокол, после сортировки, введите в ответ теста.	· Установить курсор в любую ячейку поля «Фамилия» таблицы «Покупатели» · Записи/Сортировка/Сортировка по возрастанию. · Ответ: 277.
08в. В БД "ФруктыКТ" из вспомогательного материала к тесту, отсортируйте таблицу "Покупатели" по возрастанию алфавитного порядка Фамилий покупателей. Номер записи, содержащую запись с фамилией – Тарасов, после сортировки, введите в ответ теста.	· Установить курсор в любую ячейку поля «Фамилия» таблицы «Покупатели» · Записи/Сортировка/Сортировка по возрастанию. · Ответ: 290.
09а. В БД "Фрукты 2010" из вспомогательного материала к тесту, создайте запрос для нахождения количества покупателей из России, не сделавших ни одного заказа. Полученное в запросе число введите в ответ теста.	Создание вспомогательного запроса · В окне БД выбрать Создать/Записи без подчиненных. · Шаг 1. Выбрать из списка в появившемся окне таблицу «Покупатели». · Шаг 2. Выбрать из списка в окне таблицу «Заказы». · Шаг 3. В обоих списках выбрать «Код покупателя». · Шаг 4. Выбрать «Код покупателя», «Имя», «Фамилия», «Страна». · Шаг 5. Назвать созданный запрос. Готово. · Открыть созданный запрос в режиме «Конструктор»: нажать правую клавишу мыши, выбрать «Конструктор». · В поле «Страна»: Условие отбора: Россия. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Поле: Код покупателя. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Count». · Назвать и сохранить запрос. · Ответ: 52.
09б. В БД "Фрукты 2010" из вспомогательного материала к тесту, создайте запрос для нахождения количества покупателей из всех стран, не сделавших ни одного заказа. Полученное в запросе число введите в ответ теста.	· Создание вспомогательного запроса · В окне БД выбрать Создать/Записи без подчиненных. · Шаг 1. Выбрать из списка в появившемся окне таблицу «Покупатели». · Шаг 2. Выбрать из списка в окне таблицу «Заказы». · Шаг 3. В обоих списках выбрать «Код покупателя». · Шаг 4. Выбрать «Код покупателя», «Имя», «Фамилия», «Страна». · Шаг 5. Назвать созданный запрос. Готово. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Поле: Код покупателя. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Count». · Назвать и сохранить запрос. · Ответ: 66.
10а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для определения названия города, покупатель из которого заказал самый дорогой заказ. Полученный в запросе город (с большой буквы) введите в ответ теста.	Создание первого вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицы «Покупатели», «Заказы», «Описания заказов», «Наборы». · Первое поле. Поле: Код покупателя (из «Покупатели»). · Второе поле. Поле: Город (из «Покупатели»). · Третье поле. Поле: Код заказа (из «Заказы»). · Четвёртое поле. Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать «Таблицы», далее нажать «Описания заказов», выбрать «Количество» и дважды по нёму щёлкнуть. Затем набрать знак умножения *. Нажать на «Наборы», выбрать «Цена», дважды щёлкнуть по ней. ОК. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»). Для первого поля «Группировка», для второго поля – «Группировка», для третьего поля – «Группировка», для четвёртого поля – «Sum». · Назвать и сохранить запрос. Создание второго вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить ранее созданный запрос. · Первое и единственное поле. Поле: Выражение 1. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Max». · Назвать и сохранить запрос. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить оба ранее созданных запроса. · Первое поле. Поле: Город (из первого запроса). · Второе поле. Поле: Выражение 1 (из первого запроса). Во втором поле убрать галочку «Вывод на экран». Условие отбора: Здесь надо построить выражение. Правой клавиши мыши, выбрать «Построить». В окне «Построитель выражений» нажать знак «=», затем нажать «Запросы», далее выбрать второй из созданных запросов, выбрать «MAX-Выражение 1» и дважды по нёму щёлкнуть. ОК. · Назвать и сохранить запрос. · Ответ: Цимлянск.
11а. В БД "ФруктыКТ" из вспомогательного материала к тесту, создайте запрос для вывода количества покупателей однофамильцев из России (общее количество человек, у которых имеются одинаковые фамилии, но разные имена). Полученное в запросе число введите в ответ теста.	Создание первого вспомогательного запроса · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить таблицу «Покупатели». · Первое поле. Поле: Код покупателя. · Второе поле. Поле: Фамилия. · Третье поле. Поле: Имя. · Четвёртое поле. Поле: Страна. Условие отбора: Россия. · Сохранить запрос. Создание второго вспомогательного запроса · В окне БД выбрать Создать/Повторяющиеся записи. · Шаг 1. Выбрать из списка в появившемся окне ранее созданный запрос. · Шаг 2. Выбрать из списка в окне поле «Фамилия», где и находятся повторяющиеся записи. · Шаг 3. Выбрать любые поля, например, «Имя», «Код покупателя», «Страна». · Шаг 4. Назвать созданный запрос. Готово. Итоговые подсчёты · Выбрать Создание запроса в режиме конструктора. Окно «Добавление таблицы»: Добавить второй из ранее созданных запросов. · Первое и единственное поле. Поле: Фамилия. · Вид/Групповые операции (в «Седьмом Офисе» правой клавишей, «Итоги»): «Count». · Назвать и сохранить запрос. · Ответ: 9.

1)Какие из приведенных ниже записей чисел на VBA задают одно и тоже значение:

1) 3.75E101

2) 37.5

3) 375E-1

4) 36.5E+10

5) 0.375E100 Ответ: 2), 3) и 5)

2)Метод VBA Range ("A1:C2"). Offset(1,1) указывает на диапазон ячеек Excel

Ответ: 1) B2:D3

3)Процедуры в языке

Ответ: небольшие самостоятельные программы, сохраняемые в модуле VBA

4) Разработанные пользователем макросы на VBA для их использования в Excel должны размещаются

Ответ: 1)Modules (модуль)

5) Функция InputBox применяется в VBA для

Ответ: ввода данных в диалоговом окне

6) Для запуска редактора VBA необходимо:

Ответ:

выбрать команду Сервис/Макрос/редактор Visual Basic

7)Процедуры в языке VBA представляет собой:

Ответ: небольшие самостоятельные программы, сохраняемые в модуле VBA

8) Массивы в языке VBA могут быть следующих типов:

Ответ: 2)одномерные

3)статические

9)В языке VBA форма пользователя представляет собой:

a = 1

Dim i As Integer

For i = 5 to 10 Step a

a = a + 1

Next i

10) Макрос в языке VBA - это:

Ответ: поименованная запись последовательности действий пользователя с целью упрощения ее многократного повторения

11) Какие типы цикла следует использовать, чтобы операторы в теле цикла были выполнены хотя бы один раз:

Ответ: 2)Do... Loop While

4)Do... Loop Until

11) Каких типов данных не существует в языке VBA:

Ответ: 2)color

3)real

12) Комментарии в программе необходимы:

Ответ:2)для пояснения смысла выполняемых действий

4)для описания назначения переменных и функций

13) Функция MsgBox применяется в VBA для

Ответ: 2)вывода данных в диалоговом окне

Задание	Решение
Определить значения следующего арифметического выражения на VBA: 26 \ 4 * 2 + 19 mod 3	Ответ: 14
Дана последовательность операторов VBA: x = 12 mod 5 If x = 0 Then x = 2 ^ x - 1 If x > 1 Then y = x ^ 2 If x > 2 Then y = x + 2 / x – 1	Ответ: 4
Если значение переменной а равно 6, то какое значение получит переменная b при выполнении оператора: Select Case a Case 5 b = 1 Case 3 to 15 b = 2 Case Is > 5 b = 3 Case 2, 4, 6, 8, 10 b = 4 End Select	Ответ:2
В книге Excel "Данные к тесту VBA" из вспогательного материала к тесту, составьте функцию VBA в модуле 1 с именем fun1 (вставьте нужные операторы в заголовки уже созданной функции), которая вычисляет выражение по формуле: 1-x^2 fun1 = --------- 2 - 3x На листе 1 книги выполните функцию и полученное в ячейке B4 значение введите в ответ теста. Дробная часть числа от целой отделяется запятой.	Решение: Public Function fun1(x As Double) As Double fun1 = (1 - x ^ 2) / (2 - 3 * x) End Function Ответ: -1
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию в модуле 1 с именем fun2 на VBA (вставьте нужные операторы в загововки уже созданной функции), которая вычисляет выражение по формуле: если x больше 0, то fun2=(1-2x)/(2+x), иначе fun2=Sin(3x)-1 На листе 1 книги выполните функцию и полученное в ячейке B5 значение, округленное до сотых, введите в ответ теста. Дробная часть числа от целой отделяется запятой.	Решение: Public Function fun2(x As Double) As Double If x > 0 Then fun2 = (1 - 2 * x) / (2 + x) Else fun2 = Sin(x) * 3 - 1 End If End Function Ответ: -1,69
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA с именем fun3 для нахождения минимального произведения двух чисел из трех произвольных чисел A, B, C. Заголовок функции, который должен иметь вид: Function fun3(a,b,c), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B6 значение введите в ответ теста.	Решение: Public Function fun3(a As Double, b As Double, c As Double) As Double If a < c And b < c Then fun3 = a * b Else If b < a And c < a Then fun3 = b * c Else fun3 = a * c End If End If End Function Ответ: 26
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA с именем fun3 для нахождения из трех произвольных чисел A, B, C, задающих длины сторон треугольника, площади треугольника, если треугольник существует, в противном случае функция должна возвратить значение -1. Заголовок функции, который должен иметь вид: Function fun3(a,b,c), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B6 значение введите в ответ теста.	Решение: Public Function fun3(a As Double, b As Double, c As Double) As Double Dim p As Double p = (a + b + c) / 2 If b + c > a And c + a > b And a + b > c Then fun3 = (p * (p - a) * (p - b) * (p - c)) ^ 0.5 Else fun3 = -1 End If End Function Ответ:11
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA с именем fun3 для нахождения из трех произвольных чисел A, B, C, задающих длины сторон треугольника, самую длинную сторону, если треугольник существует, в противном случае функция должна возвратить значение -3. Заголовок функции, который должен иметь вид: Function fun3(a,b,c), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B6 значение введите в ответ теста.	Решение: Public Function fun3(a As Double, b As Double, c As Double) As Double Dim m As Double If b + c > a And c + a > b And a + b > c Then If a > b Then m = a Else m = b End If If c > m Then fun3 = c Else fun3 = m End If Else fun3 = -3 End If End Function Ответ: 7
Определить значения следующего арифметического выражения на VBA: 2 \ 4 * 2 + 15 mod 3	Ответ: 0
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA с именем fun3 для нахождения из трех произвольных чисел A, B, C минимального значения. Заголовок функции, который должен иметь вид: Function fun3(a,b,c), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B6 значение введите в ответ теста.	Решение: Public Function fun3(a As Double, b As Double, c As Double) Dim m As Double If a < b Then m = a Else: m = b End If If c < m Then fun3 = c Else: fun3 = m End If End Function
Если значение переменной а равно 20, то какое значение получит переменная b при выполнении оператора: Select Case a Case 5 b = 1 Case 3 to 15 b = 2 Case Is > 5 b = 3 Case 2, 4, 6, 8, 10, 20 b = 4 End Select	Ответ: 3
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию в модуле 1 с именем fun1 на VBA (вставьте нужные операторы в заголовки уже созданной функции), которая вычисляет выражение по формуле: (1-x)^2 fun1 = ---------- + (x-2)^3 2 + 3x На листе 1 книги выполните функцию и полученное в ячейке B4 значение введите в ответ теста. Дробная часть числа от целой отделяется запятой.
В книге Excel "Данные к тесту VBA" из вспомогательного материала к тесту, составьте функцию в модуле 1 с именем fun2 на VBA (вставьте нужные операторы в загововки функции созданной функции), которая вычисляет выражение по формуле: если x > 2, то fun2=(1-2x)/(2-x), иначе fun2=cos(x)+1. На листе 1 книги выполните функцию и полученное в ячейке B5 значение, округленное до сотых, введите в ответ теста. Дробная часть числа от целой отделяется запятой.
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA с именем fun3 для нахождения минимального произведения двух чисел из трех произвольных чисел A, B, C. Заголовок функции, который должен иметь вид: Function fun3(a,b,c), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B6 значение введите в ответ теста.
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun1 (вставьте нужные операторы в заголовки уже созданной функции), которая вычисляет выражение по формуле: (1-x)^2 fun1 = ---------- 2 + 3x	Ответ: -4,75
Какое значение получит переменная S после выполнения группы операторов VBA: S = 1 For i = 2 To 5 Step -2 S = S - i Next i	Ответ: 1
Какое значение получит переменная S после выполнения группы операторов VBA: S = 1 For i = 5 To 2 Step 2 S = S + i Next i	Ответ: 1
Дана последовательность операторов VBA: x = 2 While x > 4 x = x + 1 Wend Определить значение переменной x после их выполнения	Ответ: 2
Дана последовательность операторов VBA: x = 2 While x < 4 x = x + 1 Wend Определить значение переменной x после их выполнения	Ответ: 4
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun4, которая вычисляет сумму S=2^2-4^2+6^2-...+30^2. Заголовок функции, который должен иметь вид: Function fun4(), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B7 значение введите в ответ теста.	Решение: Public Function fun4() Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 2 While i1 <= 30 s1 = s1 + i1 ^ 2 i1 = i1 + 4 Wend s2 = 0 i2 = 4 While i2 <= 28 s2 = s2 + i2 ^ 2 i2 = i2 + 4 Wend fun4 = s1 - s2 End Function Ответ: 672
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun4, которая вычисляет сумму S=2^2-3^2+4^2-...+20^2. Заголовок функции, который должен иметь вид: Function fun4(), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B7 значение введите в ответ теста.	Решение: Public Function fun4() Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 2 While i1 <= 20 s1 = s1 + i1 ^ 2 i1 = i1 + 2 Wend s2 = 0 i2 = 3 While i2 <= 19 s2 = s2 + i2 ^ 2 i2 = i2 + 2 Wend fun4 = s1 - s2 End Function Ответ: 295,4
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun4, которая вычисляет сумму S=1-2^3+3^3-...-20^3. Заголовок функции, который должен иметь вид: Function fun4(), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B7 значение введите в ответ теста.	Решение: Public Function fun4() Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 1 While i1 <= 19 s1 = s1 + i1 ^ 3 i1 = i1 + 2 Wend s2 = 0 i2 = 2 While i2 <= 20 s2 = s2 + i2 ^ 3 i2 = i2 + 2 Wend fun4 = s1 - s2 End Function Ответ: -6020
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun4, которая вычисляет сумму S=2^2-3^2+4^2-...+30^2. Заголовок функции, который должен иметь вид: Function fun4(), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B7 значение введите в ответ теста.	Решение: Public Function fun4() Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 2 While i1 <= 30 s1 = s1 + i1 ^ 2 i1 = i1 + 2 Wend s2 = 0 i2 = 3 While i2 <= 29 s2 = s2 + i2 ^ 2 i2 = i2 + 2 Wend fun4 = s1 - s2 End Function Ответ: 652,4
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun4, которая вычисляет сумму S=1+2^2+3^2-...+25^2. Заголовок функции, который должен иметь вид: Function fun4(), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B7 значение введите в ответ теста.	Решение: Public Function fun4() Dim s As Double, i As Integer s = 0 i = 1 While i <= 25 s = s + i ^ 2 i = i + 2 Wend fun4 = s End Function Ответ: 7735
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun5,которая вычисляет сумму S=1-2^3+3^3-...-n^3. Заголовок функции, который должен иметь вид: Function fun5(n), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B8 значение введите в ответ теста.	Решение: Public Function fun5(n As Integer) As Integer Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 1 While i1 <= n s1 = s1 + i1 ^ 3 i1 = i1 + 2 Wend s2 = 0 i2 = 2 While i2 <= n s2 = s2 + i2 ^ 3 i2 = i2 + 2 Wend fun5 = s1 - s2 End Function Ответ: -23
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun5, которая вычисляет сумму S=1-2^2+3^2-...-n^2. Заголовок функции, который должен иметь вид: Function fun5(n), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B8 значение введите в ответ теста.	Решение: Public Function fun5(n As Integer) As Integer Dim s1 As Double, i1 As Integer, s2 As Double, i2 As Integer s1 = 0 i1 = 1 While i1 <= n s1 = s1 + i1 ^ 2 i1 = i1 + 2 Wend s2 = 0 i2 = 2 While i2 <= n s2 = s2 + i2 ^ 2 i2 = i2 + 2 Wend fun5 = s1 - s2 End Function Ответ: -8
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun6, которая вычисляет сумму n первых натуральных чисел Фибоначчи. Заголовок функции, который должен иметь вид: Function fun6(n), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B9 значение введите в ответ теста.	Решение: Public Function fun6(n As Double) As Double Dim s As Double, p As Integer, i As Integer, k As Integer s = 0 p = 1 i = 1 For k = 1 To n s = p + i p = i i = s Next k fun6 = s - 1 End Function Ответ:381
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun7, которая вычисляет сумму квадратов цифр заданного числа n. Заголовок функции, который должен иметь вид: Function fun7(n), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B10 значение введите в ответ теста.	Решение: Public Function fun7(ByVal n As Long) As Double n = Abs(n) Dim p p = 0 While n <> 0 p = p + (n Mod 10) ^ 2 n = n \ 10 Wend fun7 = p End Function Ответ: 4
В книге Excel "Данные к тесту VBA" из учебных материалов к модулю, составьте функцию VBA в модуле 1 с именем fun7, которая вычисляет произведение цифр заданного числа n. Заголовок функции, который должен иметь вид: Function fun7(n), уже создан в модуле 1, необходимо только записать тело процедуры. На листе 1 книги выполните функцию и полученное в ячейке B10 значение введите в ответ теста.	Решение: Public Function fun7(ByVal n As Long) As Double n = Abs(n) Dim p p = 0 While n <> 0 p = p *n Mod 10 n = n \ 10 Wend fun7 = p End Function Ответ: 2

Дата добавления: 2015-12-17; просмотров: 78; Мы поможем в написании вашей работы!

Поделиться с друзьями:

⇐ Предыдущая 123 4 5 6 7 8 9 Следующая ⇒

Мы поможем в написании ваших работ!