Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Метод указания ИНФОРМ Общ курс Стационар рус.doc
Скачиваний:
8
Добавлен:
10.02.2016
Размер:
2.87 Mб
Скачать

Результат выполнения программы:

1-й вариант

A, N? 2, 3_

Y = -60.25818266

2-й вариант

A, N? 2, -1_

Функция Y не определена

3.7. Пример выполнения задачи 2б

Задание: В соответствии с условием разработать алгоритм разветвленной структуры и составить программу вычисления функции

Условие: , если 1 <x < 2

y = , еслиx ≥ 2

, если x ≤ 1

Решение: примем обозначения: Y → Y, x → X, a → A, b → B

При решении необходимо предусмотреть три возможных варианта вычисления функции Y по одной из трех формул в зависимости от условий.

Блок – схема

+ -

-

+

Программа

REM алгоритм разветвляющейся структуры ‘оператор- комментарий

INPUT “ A, B, X”; A, B, X ‘ввод данных

IF X > 1 AND X < 2 THEN ‘оператор условного перехода

Y = (A+ X^2) ^ (1 / 3) ‘оператор присваивания

ELSE IF X > = 2 THEN ‘оператор условного перехода

Y = LOG (0.5 + X) ‘оператор присваивания

ELSE

Y = SIN (ABS(X)) + B ‘операторы присваивания

END IF ‘завершение оператора условного перехода

END IF ‘завершение оператора условного перехода

PRINT “Y =”; Y ‘вывод

END ‘конец программы

Результат выполнения программы:

1-й вариант A, B, X? 2, 3, 1.5 _

Y = 1.61977

2-й вариант A, B, X? 2, 3, 4 _

Y = 1.504077

3-й вариант A, B, X? 2, 3, -1 _

Y = 3.017452

3.8. Пример выполнения задачи 3 а

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

Условие: , де,

Решение: примем обозначения yk → yk, xk → xk, Δ → DL, k → К

В основе решения лежит простой цикл, при реализации которого заранее известно число циклических действий (повторений). Решение можно осуществить с помощью операторов WHILE – WEND, DO – LOOP, FOR – NEXT.

Блок – схемы

1. Цикл ''Пока'' 2. Цикл '' До'' 3. Цикл ''Со счетчиком''

+

-

+

Замечание:

в алгоритмах № 1 и 2 необходимо до начала циклических действий выполнить начальные присваивания – действия, обеспечивающие выполнение первого шага цикла (в данном примере – это начальное значение параметра цикла k = 2).

Программы

REM алгоритм циклической структуры ''Пока'' ‘оператор- комментарий

INPUT “ DL”; DL ‘ввод данных

K= 2 ‘оператор присваивания

WHILE K < = 10 ‘оператор начала цикла

XK =0.2+DL * K : YK = SIN(ABS(1- XK))^3 ‘оператор присваивания

PRINT “Y''; K;” =”; YK ‘вывод

K= K+2 ‘оператор присваивания

WEND ‘завершение цикла

END ‘ конец программы

REM алгоритм циклической структуры '' До'' ‘оператор- комментарий

INPUT “ DL”; DL ‘ввод данных

K= 2 ‘оператор присваивания

DO ‘оператор начала цикла

XK =0.2+DL * K : YK = SIN(ABS(1- XK))^3 ‘оператор присваивания

PRINT “Y''; K;” =”; YK ‘вывод

K= K+2 ‘оператор присваивания

LOOP UNTIL K > 10 ‘завершение цикла

END ‘конец программы

REM алгоритм цикл. структуры ''Со счетчиком'' ‘оператор- комментарий

INPUT “ DL”; DL ‘ввод данных

FOR K = 2 TO 10 STEP 2 ‘оператор начала цикла

XK =0.2+DL * K: YK = SIN(ABS(1- XK))^3 ‘оператор присваивания

PRINT “Y''; K;” =”; YK ‘вывод

NEXT K ‘завершение цикла

END ‘конец программы