Основы и принципы работы в VBA. Часть 2: Методические указания к выполнению лабораторных работ, страница 7

8.2. Индивидуальные задания

З а д а н и е 1. Подсчитать функцию Z по варианту, используя про-цедуру-функцию для повторяющихся выражений (табл. 8.1).

Таблица 8.1

Данные для вычисления функции с использованием процедуры-функции

Вари-ант

Функция

Ответ

1

2

3

1

Z = 0,4035117

Продолжение табл. 8.1

1

2

3

2

Z = –7,679935

3

 

Z = –0,55220

4

Z = –14,20461

5

Z = 57,9675

6

Z = 0,939

7

Z = 0,3759488

8

Z = – 28,9568

9

Z = 4,881685

10

Z = 1,870941

11

Z = 23,65289

12

Z = 0,1382203

Окончание табл. 8.1

1

2

3

13

Z = 2,02913

14

Z = 0,525

15

Z = 13,5899

16

17

18

Z = – 0,917

19

Z = 2,84

20

Z = – 0,37

21

Z = – 454,94

22

Z = 0,038

Задание 2. Вычислить значения функций, используя процедуру-подпрограмму (табл. 8.2).

Таблица 8.2

Варианты задач для создания процедуры-подпрограммы

Вариант

Задание

1

2

1

Определить факториал S = N! + K! + (I + K)!, где N = 3, K =  5,
I = 8. Порядок вычисление факториала оформить в виде
процедуры-подпрограммы

2

Даны действительные числа  a  и  b.  Вычислить  переменные:
U = min (a, b),  V = min (ab, a + b); Z = min (U + V2, 3,14). Вычисление минимального значения двух действительных чисел оформить в виде  процедуры-подпрограммы

3

Даны два числа – a, b  определить значение переменной , где max(x, y) – максимальное из чисел x, y.  Поиск максимума оформить подпрограммой

4

Вычислить функцию , где  – объемы шаров с радиусом. Подсчет объемов осуществить в про-цедуре-подпрограмме

5

Определить число сочетаний  из n по m по формуле: , где n = 6, m = 3. Вычисление факториала оформить в виде подпрограммы

6

Определить значение переменной: , где z1, z2 – корни уравнения ; y1, y2 – корни уравнения 2. Вычисление корней оформить в процедуре-подпрограмме

7

Даны два треугольника: первый – со сторонами  а = 2; в = 4;
с = 5; второй – со сторонами  а = 10; в = 12; с = 18. Найти сумму площадей треугольников. Площадь треугольника вычислить по формуле Герона: , где р – полупериметр треугольника  в подпрограмме

Продолжение табл. 8.2

1

2

7

Даны три числа – a, b, c, вычислить переменную  . Определение min(x, y)  и  max(x, y) производить в подпрограмме

9

Найти периметр треугольника, вершины  которого заданы координатами вершин A(1; 1), B(4; 2), C(2; 3,5). Длину сторон  найти в подпрограмме, используя формулу для вычисления расстояния
между  двумя точками:

10

Даны три числа – a, b, c, вычислить переменную . Вычисление min(x, y)  и  max(x, y) производить в подпрограмме

11

Заданы три стороны треугольника: а = 2; в = 4; с = 5. Вычислить значения косинусов половинных углов треугольника, используя теорему косинусов: , где р – полупериметр треугольника, , в подпрограмме

12

Даны вещественные числа a, b, c, d, e, f, g.  Найти площадь пятиугольника, изображенного на рисунке. При расчете площади треугольника по трем сторонам  использовать подпрограмму, площадь треугольника вычислить по формуле Герона (см. вариант 6)

 


13

Даны два числа – a, b. Определить значение переменной  , где max(x, y) есть максимальное из чисел x, y.  Поиск максимума оформить подпрограммой

Окончание табл. 8.2

1

2

14

Вычислить значение переменной: ,

где при задании чисел в диапазоне от 100 до 250 – количество чисел, кратных трем; – количество чисел, кратных пяти; – количество чисел, кратных 12.

15

Найти периметр фигуры ABCD, представленный на рисунке,  по заданным сторонам AB, AC и DC и углам   BAC =   BCD = 90o, создав подпрограмму для расчета гипотенузы прямоугольного треугольника по его катетам

 


Библиографический список

1. Соболь Б. В. Информатика / Б. В. Соболь / Ростов-на-Дону: Феникс, 2005. 448 с.

2. Информатика. Базовый курс / С. В. Симонович, Г. А. Евсеев и др. СПб: Питер, 2005. 640 с.

3. Васильев А. А. VBA в Office 2000 / А. А. Васильев, А. Б. Андреев. СПб: Питер, 2001. 432 с.

4. Кузьменко В. Г. VBA 2003 / В. Г. Кузьменко. М.: Бином-Пресс, 2004. 408 с.

5. Назаров С. В.  Программирование  на  MS Visual Basic / С. В.  Наза-ров, П. П. Мельников. М.: Финансы и статистика, 2003. 320 с.

Учебное  издание

Иванова Валентина Васильевна, КРЫГИН Анатолий Николаевич,

САЛЯ Илья Леонидович, УСОЛЬЦЕВА Лариса Александровна

Основы  и  принципы  работы  в  vba

Часть 2

_________________

Редактор Т. С. Паршикова

 *** 

Подписано в печать       .09.2008. Формат 60 × 84 1/16.

Плоская печать. Бумага офсетная. Усл. печ. л. 2,3. Уч.-изд. л. 2,5.

 Тираж 800 экз. Заказ        .

**

Редакционно-издательский отдел ОмГУПСа

Типография ОмГУПСа 

*

644046, г. Омск,  пр. Маркса, 35