Порядок выполнения работы

1.Создать Excel-документ и сохранить его в бригадной папке под именем “Сумма чисел”.

2.Запустить редактор VBA и вставить в рабочее поле форму проекта.

3.Задать имя проекта “Проба Do_Loop”.

4.Задать заголовок на форме “Суммирование ряда целых чисел от 1 до 5”.

5.Создать в форме командную кнопку с именем “CmdРешение” и надписью “Пуск”.

6.Создать в форме надпись (метку) “Сумма”, а под ней – текстовое поле для вывода результата (имя поля оставить стандартным TextBox1).

7.Создать следующий программный модуль:

Private Sub CmdРешение_Click( )

Dim s As Integer, i As Integer

s=0 ‘Начальное значение суммы

i=1 ‘Начальное значение ряда чисел

Do While i<=5

s=s+i’Накопление суммы

i=i+1’Задание очередного числа

Loop

TextBox1.Text=s

End Sub

8.Сохранить разработанный проект и выполнить созданную программу.

9.Закрыть редактор VBA и подготовить для дальнейшей работы 3 копии исходного файла "Сумма чисел” под именами “While в конце”, ”Until в начале”, ”Until в конце”.

10.Открыть последовательно подготовленные копии исходного файла, выполнить необходимые изменения в тексте исходной программы, поставив служебные слова While и Until как указано в имени файла, выполнить измененные программы и сохранить их при успешном выполнении.

11.Создать два Excel-документа и сохранить их в бригадной папке под именами «Пробег дня 20 км» и «Сумма пробега 100 км».

12.Начать реализацию расчета двух показателей тренировок спортсмена-бегуна.

13. В конце работы самостоятельно реализовать проект по варианту, заданному преподавателем.

14. Ознакомиться с содержанием проекта (формы и программы) «Метод бисекции». Составить алгоритм, реализованный этой программой. Выполнить программу для исходных данных: начало интервала - -1, конец интервала – 5, точность – 0,01.