Изучение типов переменных, операторов присваивания, условного перехода на примере пользовательской функции

Страницы работы

Содержание работы

Задание 2

На примере пользовательской функции изучить типы переменных, операторы присваивания, условного перехода и др.

пример Функции пользователя ( Y = sin(πx)e-2x  )

1.  Открыть Excel, свою или новую

2.  Выполнить: вставка - модуль

3.  В окне модуля набрать программу:

Function Y(x)

Y = Sin(Application.Pi()*x)*Exp(-2*x)

End Function

4.  Проверьте работу этой Функции пользователя в книге Excel (для одного значения, ряда, построить диаграмму)

5.  Можно задать параметры Функции:

¨  Находясь на листе модуля нажмите F2

¨  В диалоговом окне посмотр объекта в поле классы выберите свою рабочую книгу компонент, затем в поле компонент выберите свою функцию Y

¨  В контекстном меню выберите  свойства

¨  В В диалоговом окне параметры компонента  установите свойства

Создать функцию пользователя с оператором условного перехода  If-Then и If-Then-Else

Синтаксис(1 вариант):

if УСЛОВИЕ then  ОПЕРАТОР_1 else ОПЕРАТОР_2


для функции:

Для проверки постройте диаграмму (тип: точечная) функции пользователя g(x)

диапазон x от –1,5 до +2 с шагом 0,1 или подробнее

Создать функцию пользователя VBA, вычисляющую комиссионные, начисляемые по следующему правилу:

-  Если продукции продано не меньше, чем на 1000000 руб., то комиссионные составляют 2% от стоимости реализованной продукции

-  Если продукции продано меньше, чем на 1000000руб., то комиссионные составляют 1% от стоимости реализованной продукции

-  Если стаж работы в фирме не меньше 5 лет, то выплачивается доплата в размере 0,5% от стоимости реализованной продукции

(подсказка: надо ввести переменные стаж, продажа, для фунции премия)

Синтаксис (2 вариант):

If УСЛОВИЕ_1 Then

                    БЛОК_ОПЕРАТОРОВ_1

Elself УСЛОВИЕ_2 Then

                    БЛОК_ОПЕРАТОРОВ_2

Elself УСЛОВИЕ_3 Then

                    БЛОК_ОПЕРАТОРОВ_3

Else

       БЛОК_ОПЕРАТОРОВ

End If

Похожие материалы

Информация о работе

Предмет:
Информатика
Тип:
Контрольные работы
Размер файла:
34 Kb
Скачали:
0