END function

FUNCTION f (x, y0)

Пример решения поставленной задачи

Функцию варианта задания оформляем как процедуру - функции, используя в меню оболочки QBasic.

· дифференциальное уравнение (Y¢(x))

f = < функция соответствующего варианта >

• интервал (а, b), шаг (h), краевое значение функции (у0)
Блок-схема для задачи решения дифференциального уравнения имеет вид.

БЛОК-СХЕМА АЛГОРИТМА РЕШЕНИЯ

Запись всех подпрограмм можно осуществить через меню оболочки QBasic:

1. Alt - вход в меню

2. Edit®New SUB … - создание новой подпрограммы

3. Edit®New FUNCTION… - создание новой подпрограммы функции

4. Набираем в диалоговом окне новое имя подпрограммы (например: eiler)

На экране появляется заготовка для создания подпрограммы:

SUB <имя подпрограммы, параметры>

<текст подпрограммы>

END SUB

1. Приступаем к написанию подпрограммы между ключевыми словами SUB и END SUB

2. Все вспомогательные подпрограммы объединяются управляющей программой или головным модулем.

3. Переход от текста управляющей программы к текстам подпрограммам происходит при нажатии клавиш F2.

Дата добавления: 2015-05-29