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

Простейшими являются программы, реализующие алгоритмы линейного вычислительного процесса. Программа в этом случае содержит операторы ввода данных, присваивания и вывода данных. Операторы записываются последовательно друг за другом в естественном порядке их следования и выполняются только один раз.

Общая структура линейной программы:

Option Explicit            ‘Запрет использования необъявленных переменных

Sub Имя_процедуры()

‘Объявление констант (Const …)

‘Объявление переменных (Dim …)

‘Тело процедуры:

‘Ввод исходных данных

‘Вычисления

‘Вывод результатов

End Sub

Пример_Л1. Составить ГСА и текст программы для вычисления функции:

где x = a∙t² + 0.2, a = 18, t – произвольное.

ГСА                       Текст программы:

Option Explicit    ‘Запрет использования необъявленных переменных

Sub Лин_процесс1()   ‘Начало процедуры Лин_процесс1

Const a = 18  ‘Объявление константы a

Dim t As Single  ‘Объявление вещественной переменной t

Dim x As Single ‘Объявление вещественной переменной x

Dim y As Single ‘Объявление вещественной переменной y

t = Val(InputBox("Введите t"))      ‘Ввод значения   t

x = a * t ^2 + 0.2      ‘Расчет   x

y = (x ^ 2 + Log(x) - (x + 1) ^ 2) / (x * Sin(x)) ‘Расчет   y

MsgBox "Результат y=" & y     ‘Вывод   y  в диалоговое окно

End Sub             ‘Конец процедуры

Ниже приведено решение того же примера с использованием других способов ввода и вывода данных.