Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Основы алгоритмизации и программирования.doc
Скачиваний:
22
Добавлен:
15.09.2019
Размер:
498.69 Кб
Скачать
  1. Постановка задачи:

Вычислить значение функции y = sinx, если известно, что –π ≤ x < π и величина шага ∆x = π/4.

  1. Входные данные: ∆x, π.

  1. Выходные данные: y.

  2. Схема алгоритма:

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

Поэтому кнопку запуска программы располагать в правом нижнем углу.

  1. Программа:

Private Sub Command1_Click()

Const pi As Single = 3.1415

Dim x As Single, y As Single

For x = -pi To pi + pi / 8 Step pi / 4

y = Sin(x)

Print "x=" & x & "y=" & y

Next

End Sub

Если предполагается запустить программу несколько раз, то лучше включить метод Cls*, который очищает форму, т.е. удаляет текст, созданный методом Print (кнопка остается).

Этот же алгоритм может, реализован с помощью Do…Loop:

Private Sub Command1_Click()

Const pi As Single = 3.1415

Dim x As Single, y As Single

Cls

x = -pi

Do While x <= pi + pi / 8

y = Sin(x)

Print "x=" & x & "y=" & y

x = x + pi / 4

Loop

End Sub

С помощью Do…UNTIL:

Private Sub Command1_Click()

Const pi As Single = 3.1415

Dim x As Single, y As Single

Cls

x = -pi

Do Until x > pi + pi / 8

y = Sin(x)

Print "x=" & x & "y=" & y

x = x + pi / 4

Loop

End Sub

Структура «цикл в цикле» с предусловием

Если функция зависит более чем от одного параметра, то структура называется вложенным циклом и алгоритм выглядит следующим образом:

Пример: z = ƒ(x, y)

Телом внутреннего Цикла является тело Цикла.

Телом внешнего Цикла является весь внутренний Цикл.

Пример:

Вычислить функцию y = sinx + z, где x меняется в диапазоне –π ≤ x ≤ π с шагом ∆x = π/2, а z меняется 1 ≤ z ≤ 3 с шагом ∆x = 0,5.

Формула расчета количества значений внешнего Цикла:

, где

K – конечное значение цикла;

N – начальное значение цикла;

∆ - шаг.

Формула расчета количества значений внутреннего Цикла:

Всего 25 значений для вложенного Цикла.

Схема алгоритма вложенной структуры с предусловием:

тело внешнего Цикла;

Основы алгоритмизации и программирования Порядок подготовки задачи к решению на компьютере:

  1. Постановка задачи

  1. Словесное описание задачи

Пример:

Вычислить высоту треугольника, если известна площадь треугольника и величина b на которую основание больше высоты.

  1. Определение состава входных данных.

Входные данные:

S – площадь треугольника (вещественное число);

b – величина, на которую основание больше высоты (вещественное число).

  1. Определение состава выходных данных.

  1. Построение математической модели задачи.

На этом этапе устанавливаются зависимости, связывающие входные и выходные данные.

На этом этапе устанавливаются зависимости, связывающие входные и выходные данные.

  1. Математическая формулировка задачи.

S = ½ (b + h)h

2S = h2 + bh

h2 + bh*2S

  1. Выбор метода решения задачи.

, т.к.

высота не может быть < 0, то

  1. Разработка схемы алгоритма решения задачи.

Алгоритм – это последовательность действий преобразующие входные данные в выходные в соответствии с математической моделью задачи.

Для построения таких схем используются следующие геометрические фигуры:

b = 1,5a

b = 2a -

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

  • предопределенный процесс –

использование ранее созданных или отдельно описанных алгоритмов и программ.

- блок решение –

выбор направления выполнения алгоритма или программ.

  • блок – дисплей.

Информация о вводе или выводе.

  • блок – документ.

Предназначен для вывода данных, носителями которых является бумага.

  • блок пуск – остановка.

Указание связи между прерванными линиями потока.

На схемах алгоритмов блоки соединяются между собой в определенной последовательности вертикальными и горизонтальными линиями потока (¯ можно не ставить).

Схема алгоритма задачи

Примечание:

В блоках алгоритма не пишется “Вычислить”, “Напечатать” и т.д. Все это отражено видом блока.

  1. Запись кодов приложений.

Privat Sab Command1…Click()

Dim b as Single, S as Single, h as Single

b = Val(txt b)

S = Val(txt S)

h = (-b + sgr(b^2 + b*S))/2

txth = str(h)

End Sub.

Для того, чтобы приступить к работе с Visual Basic (VB) необходимо сначала сконструировать форму, на которой расположить элементы управления, а затем для требуемых соответствующих элементов управления записать код.

  1. Отладка –