Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторная работа_2.doc
Скачиваний:
8
Добавлен:
22.05.2015
Размер:
783.36 Кб
Скачать

Математические функции и математические константы

Встроенные математические функции VB6 работают и в VB .NET, но мы предпочитаем использовать методы класса Math, входящего в .NET Framework. В этот класс также входят некоторые полезные константы (например, Math. PI и Math. Е). Основные математические функции класса Math перечислены в табл. 4.9. Все эти функции объявлены общими (shared), поэтому они принадлежат классу Math в целом, а не его отдельным экземплярам.

Все перечисленные методы являются общими методами класса Math, поэтому они должны вызываться с префиксом Math — например, Math.Log10(l0).

В VB .NET предусмотрена целая группа методов для получения разнообразных случайных чисел.

Таблица 4.9. Общие математические функции класса Math

Математическая функция

Описание

Abs

Возвращает абсолютное значение (модуль) числа

Acos

Возвращает угол, косинус которого равен заданному числу

Asin

Возвращает угол, синус которого равен заданному числу

Atan

Возвращает угол, тангенс которого равен заданному числу

Ceiling

Возвращает наименьшее целое число, большее либо равное заданному числу

Cos

Возвращает косинус заданного угла

Exp

Возвращает число е (приблизительно 2,71828182845905), возведенное в заданную степень

Floor

Возвращает наибольшее целое число, большее либо равное заданному числу

Log

Возвращает натуральный логарифм

Log10

Возвращает десятичный логарифм

Max

Возвращает большее из двух заданных чисел

Min

Возвращает меньшее из двух заданных чисел

Round

Возвращает целое число, ближайшее к заданному числу

Sign

Возвращает величину, определяющую знак числа

Sin

Возвращает синус заданного угла

Sqr

Возвращает квадратный корень

Tan

Возвращает тангенс заданного угла

Пример программы, вычисляющей математическое выражение

Module Module1

Sub Main()

Console.WriteLine("Введите значение X = ")

Dim x As Integer

x=Convert.ToInt32(Console.ReadLine())

Dim alfa,y As Dooble

Console.Write("Введите значение АЛЬФА = ")

alfa = CDbl(Console.ReadLine())

y = ((Math.Sqr(X)*Math.PI)-(Math.Exp(Math.Sqr(4))+Math.Sin(2*ALFA)-2*10^2*(Math.Log10(X))))

Console.WriteLine("Результат = " &y)

Console.ReadKey()

End Sub

End Module

5 Задания для выполнения лабораторной работы

  1. ;

  1. ;