Функции в языке VBasic. Математические функции 12 августа 2015 г.
Опрос Функции в программировании. Правило записи. Аргументы. Типы. Значения Функция VAL – Назначение – Правило записи – Аргументы функции
Вопросы Математические функции – Функция квадратного корня – Функция логарифма – Показательная функция – Функция случайного числа Практическая работа Д.З. – Читать §4.9.2
Функция квадратного корня Назначение – Определение квадратного корня от аргумента Аргумент функции – Должен быть >= 0 Числовые константы Числовые переменные Числовые выражения Значение функции – Числовой тип Правило записи SQR( )
Задание 1 (сохранить в папке Урок Задание 1) Скопировать проект Задание 2 урока 44 в папку Урок 45. Переименуйте в Задание 1 Открыть файл проекта Изменить заголовок формы на «Инженерный калькулятор» Добавить командную кнопку «Корень квадратный» Запрограммировать процедура расчета квадратного корня от числа, вводимого в первое текстовое поле Private Sub Command1_Click() Dim a, b As Double a = VAL(Text1.Text) b = SQR(a) Text3. Text = b End Sub
Функция логарифма Назначение – Определение натурального логарифма от аргумента Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Числовой тип Правило записи LOG( )
Задание 2 Открыть предыдущий проект Добавить командную кнопку «Логарифм» Запрограммировать процедура расчета логарифма от числа, вводимого в первое текстовое поле Private Sub Command2_Click() Dim a, b As Double a = VAL(Text1.Text) b = LOG(a) Text3. Text = b End Sub
Показательная функция Назначение – Определение значения функции e Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Числовой тип Правило записи EXP( )
Задание 3 Открыть предыдущий проект Добавить командную кнопку «Показательная функция» Запрограммировать процедура расчета логарифма от числа, вводимого в первое текстовое поле Private Sub Command3_Click() Dim a, b As Double a = VAL(Text1.Text) b = EXP(a) Text3. Text = b End Sub
Функция случайного числа Назначение – Возвращение случайного числа в диапазоне от 0 до 1 Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Числовой тип Правило записи RND( )
Задание 4 Открыть предыдущий проект Добавить командную кнопку «Случайное число» Запрограммировать процедура вывода случайного числа в третье текстовое поле Private Sub Command4_Click() Dim a As Double a = RND(100) Text3. Text = a End Sub
Функция INT Назначение – Отбрасывает дробную часть аргумента Правило записи – INT( ) Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Целый числовой тип Применение – INT(100*RND(1) +1) получение случайного числа в диапазоне от 1 до 100
Функция модуля Возвращает абсолютное значение аргумента Правило записи – ABS( ) Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Числовой тип >=0
Функция знака Назначение – Возвращает -1, если аргумент < 0 – Возвращает +1, если аргумент >0 – Возвращает 0, если аргумент =0 Правило записи – SGN( ) Аргумент функции – Числовые константы – Числовые переменные – Числовые выражения Значение функции – Числовой тип
Тригонометрические функции Синус – SIN( ) Косинус – COS( ) Тангенс – TAN( ) Аргумент функций – Значение угла в радианах Числовые константы Числовые переменные Числовые выражения Значение функции – Числовой тип Пример использования SIN(VAL(Text1.text)* 3,1415/180) расчет синуса от значения в градусах, введенное в текстовое поле
Задание 5 Доработать проект, введя дополнительные кнопки расчета – Синуса – Косинуса – Тангенса – Котангенса – Модуля – Знака – Получение случайного числа от 0 до 16 Сохранить изменения. Откомпилировать файл