Вариации вопросов, описанных в файле «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.

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

Ответ: 1) B2:D3

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

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

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

Ответ: 2)color

3)real

Задание

Решение

Определить значения следующего арифметического выражения на 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