Visual Basic. Циклы


Задача

Составить в среде VBA программу на языке Basic в виде подпрограммы-процедуры для решения задачи: построение таблицы значений функции в соответствии с Вашим вариантом на отрезке [a , b] с шагом h , а также суммирование полученных значений функций. Выполнить в ЭТ Excel макрос (процедуру) для функции f(x) с выводом результатов на рабочий лист.

Поскольку группа операторов выполняется до тех пор пока условие x < b истинно и результатом проведенных действий является несколько значений, то данная программа относится к процедурам-подпрограммам с циклической структурой.

Данная структура является циклом с параметром, где x - параметр, a – начальное значение параметра, b1 – конечное значение параметра, h – шаг изменения параметра. Для программирования такой структуры необходимо использовать оператор For/Next .

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

Для разработки программы-процедуры следует:

Примечание:
Для ввода данных с рабочего листа и их вывод на рабочий лист можно использовать следующие конструкции:

С помощью данных конструкций можно, как считывать данные с листа, так и выводить их на рабочий лист. Конструкция (а) позволяет получить доступ к ячейке на пересечении строки с номером i и столбца с номером j на активном рабочем листе. Конструкция (б) позволяет непосредственно указать обычный адрес ячейки.

Примеры:

Текст программы-процедуры для функции может иметь вид:

Для того, чтобы просуммировать все значения функции необходимо задать начальную сумму s=0, тело цикла будет имеет следующий вид:

Полученную сумму необходимо вывести на экран.

Для выполнения процедуры-подпрограммы необходимо выполнить следующую последовательность команд главного меню ЭТ Excel : Сервис–Макрос–Макросы (или сочетание клавиш Alt + F8). В появившемся диалоговом окне «Макрос» выбирать имя процедуры и дать команду «Выполнить».

В результате выполнения процедуры при соответствующих исходных данных получили: