Стандартные функции

1). Abs(x) модуль числа х

2). Atn(x) арктангенс числа х, результат - в радианах

arcsin(x)= для <1

arccos(x)= для -1<=x<0

arccos(x)= для 0<x<=1

π=4·arctg(1)

3). Cos(x)

4). Sin(x)

5). log(x) натуральный логарифм числа х

6). Sqr(x) корень квадратный из числа х

7). Tan(x) тангенс числа х

Аргументы тригонометрических функций выражаются в радианах.

Перевод градусов в радианы и обратно:

_рад *180/π

8). Now текущее время и дата

9). Date текущая дата в виде текстовой строки длиной 10 символов (mm-dd-yyyy)

10). Sgn(x)= знак числа х

11). Exp(x) =

12). Asc(string) код символа (ASCII)

13). Chr(0-255) символ, соответствующий коду

14). Str(число) строка символов, полученная преобразованием числа

15). Val(string) число, полученное преобразованием строки символов

16). Time текущее время в формате «чч:мм:сс»

Порядок вычисления выражений.

Начинается вычисление с определения констант и переменных, входящих в выражение. Затем операции выполняются в соответствии с их приоритетом в следующем порядке:

• операции в скобках;

• вычисляются значения стандартных функций;

• ^, *, /, \, mod, +, - ;

• операции сравнения

• логические операции Not, And, Or, Xor, Eqv, Imp

Операции одного приоритета выполняются слева направо в порядке их записи.

Программирование линейных вычислительных процессов

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

Рассмотрим пример создания проекта для вычисления значения функции y=x² + sin x.

Алгоритм решения данной задачи:

1. Ввод значения аргумента.

2. Вычисление значения функции по данной формуле.

3. Вывод значения х и результата вычисления y.

4. Конец работы.

Блок-схема алгоритма:

Рассмотрим необходимые операторы для выпонения действий алгоритма. Оператор – это слово, определяющее характер действия.

Оператор присваивания

Синтаксис оператора

Имя_переменной = Выражение, где

= - обозначение оператора

Вычисляется значение Выражения и результат помещается в переменную, стящую слева от «=» (переменной присваивается значение выражения).Тип переменной должен соответствовать типу результата вычисления выражения, например, нельзя переменной числового целого типа присвоить значение вещественного типа или строковой переменной нельзя присвоить числовое значение.

Примеры

1. Dim x as Integer, y as single

2. Dim i as byte

i=0

i=i+1

3. Dim Res as boolean

Res= (i>0) and (i<10)

4. txtTime.Text=tTime

Оператор коментария Rem

Оператор Rem означает пояснения (коментарии) в программном коде. Коментарий – любой текст. Коментарии не компилируются, т. е. их нет в exe-файле. Альтернативой обозначению Rem является апостроф «‘».Коментарий может занимать несколько строк или находиться в строке после операторов.

Примеры

1. Rem Вычисление значения функции

Rem по заданной формуле

2. s = a+b ‘вычисление суммы

Создадим приложение для решения нашей задачи.

Создадим форму следующего вида

Form1

Label1

Text1

Command1

Text2

Label2

Label3

Label4

OLE1

Label5

Command2

Label1 – Label5 - 5 полей меток для пояснительных надписей;

Text1 и Text2 - текстовые окна для ввода х и вывода y;

Command1 и Command2 - командные кнопки для запуска проекта и окончания работы с проектом;

OLE1 - объект для отображения на форме формулы для вычисления y.

Зададим свойства объектам.

Объект	Свойства
	Name	Caption	Text
Form1	Form1	Линейный вычислительный процесс
Command1	btnStart	Вычислить
Command2	btnStop	Конец
Text1	txtX		пусто
Text2	txtY		пусто
Label1	Label1	Введите значение X
Label2	Label2	Нажмите кнопку Вычислить
Label3	Label3	Результат вычисления Y
Label4	Label4	Расчетная формула
Label5	Label5	Окончание работы

После задания свойств объектам форма будет иметь вид;

Введите значение Х

Нажмите кнопку Вычислить

Результат вычисления У

Линейный вычислительный процесс

Расчетная формула

Окончание работы

Вычислить

Y=x²+sin x

Конец

Для отображения формулы на форме используем объект OLE. После щелчка на этом объекте нужно очеотить на форме размер окна для формулы. Из открывшегося списка выбрать редактор формул Microsoft Equation 3.0. Набрать формулу, щелкнуть вне окна с флормулой - формула отобразится на форме. Свойства этого объекта менять не надо.

Напишем процедуры для командных кнопок.

--Процедура Private Sub btnStop_Click() закончит работу с приложением.

Private Sub btnStop_Click()

End

End Sub

--В процедуре Private Sub btnStart_Click() вычисляется значение У и выводится в текстовое окно.

Private Sub btnStart_Click()

Rem Вычисление значения функции и вывод результата

Dim x, y, As Single ‘объявление переменных

x = Val(txtX.Text) ‘присваивание х введенного значения

y = x^2 + Sin(x) ‘вычисление у

txtY.Text = Str(y) ‘вывод у в текстовое окно

End Sub

Значение х нужно ввести с клавиатуры в текстовое окно. При этом введенное значение присваивается свойству Text данного текстового окна и представляют собой строку символов. В нашей задаче х должно быть числом. Поэтому надо преобразовать значение х из строкового типа в числовой тип. Для такого преобразования используется функция Val(string). В строке

x = Val(txtX.Text)

значение свойства Text текстового окна txtX преобразуется в числовой тип и присваивается переменной х.

Вывод значения у осуществляется оператором txtY.Text = Str(y), который свойству Text текстового окна txtY присваивает значение переменной у, преобразованное функцией Str (число) из числового типа в строковый, при этом у отображается в текстовом окне txtY.

Созданное приложение будет работать следующим образом. При запуске проекта на экране появится форма, в соответствующее текстовое окно, предварительно щелкнув в нем, нужно с клавиатуры ввести значение х. Затем щелкнуть кнопку Вычислить – выполнится процедура Private Sub btnStart_Click() и в соответствующем текстовом окне отобразится вычисленное значение у. Можно ввести новое значение х, удалив в окне имеющееся, и опять щелкнуть кнопку Вычислить и т. д. Закончить работу приложения – щелкнуть кнопку Конец.