Линейный алгоритм

Задание 1. Разработать программу для вычисления значения функции и вывода его на экран. Аргументы вводить с клавиатуры:

.

Выполнение. Программа состоит из 3 частей: 1) ввод неизвестных параметров (переменных) с клавиатуры – в данном случае переменных x и y; 2) вычисление функции по заданной формуле и помещение результата в любую незадействованную переменную, пусть – f; 3) вывод результата на экран.

Программа

1     Sub Lineyniy_1() 'Начало подпрограммы (макроса)

2      

3     x = Val(InputBox("Введите x:")) 'Ввод параметра x с клавиатуры

4     y = Val(InputBox("Введите y:")) 'Ввод параметра y с клавиатуры

5      

6     f = (Sqr(5 + x + 5 * x ^ 2) + x * Sqr(5) + x ^ 3) / (Log(x) + Log(x) ^ 2 + Log(x ^ 2)) * (3 ^ (x + 2) - 2 * x) + 1 / (4 - x ^ 2 * Sqr(y)) 'Вычисление функции по формуле и помещение результата в f

7      

8     Debug.Print "Результат ="; f 'Вывод результата на экран

9      

10   End Sub 'Окончание подпрограммы

Словесное описание программы

Перед вычислением заданного выражения необходимо ввести в память компьютера значения всех неизвестных параметров. Поэтому первым этапом выполняется ввод переменных с клавиатуры (строки 3–4). Далее в строке 6 вычисляется результат по заданной формуле и помещается в новую переменную. Результат посчитан, но для того, чтобы его увидеть, необходимо вывести его на экран, что и делается в строчке 8.

Блок-схема

( Примечание: здесь и далее выносками с цифрами обозначены номера строчек, которым соответствует данный блок. На реальных блок-схемах их отображать не следует).

Скачано с www.znanio.ru