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

, где ,

Решение: примем обозначения: y_k →YK, x_k → XK, Δ →DL, k →К

Решение можно осуществить с помощью операторов WHILE – WEND, DO – LOOP, FOR – NEXT.

1. Цикл «ПОКА»

Блок – схема

_

+

Программа   REM Табулирование функции REM Цикл Пока WHILE - WEND DIМ A, B0, D, Bi, Yi, i INPUT “B0, D, A”; B0, D, A i = 1 WHILE i < = 5 Bi = B0 - D * i: Bi1= B0 + D * (i + 1) Yi = (0.27+ Bi) ^ (1/ 3) +SIN (Bi –4 * A) / (1 - LOG (Bi1)) PRINT “Y“; I; “=“; Yi i = i + 1 WEND END     REM табулирование функции REM Цикл Пока DO- LOOP DIМ A, B0, D, Bi, Yi, i INPUT “B0, D, A”; B0, D, A i = 1 DO WHILE i < = 5 Bi = B0 - D * i: Bi1= B0 + D * (i + 1) Yi = (0.27+ Bi) ^ (1/ 3)+SIN (Bi –4 * A) / (1 - LOG (Bi1)) PRINT “Y“; I; “=“; Yi i = i + 1 LOOP END

2 Цикл «До»

Блок – схема

-

+

Программа   REM алгоритм цикл. стр. Цикл До DO-LOOP REM табулирование функции DIМ A, B0, D, Bi, Yi, i INPUT “B0, D, A”; B0, D, A i = 1 DO Bi = B0 - D * i: Bi1= B0 + D * (i + 1) Yi = (0.27+Bi) ^ (1/ 3) + SIN (Bi –4 *A) / (1 – LOG(Bi1)) PRINT “Y“; I; “=“; Yi i = i + 1 LOOP UNTIL i > 5 END

3. Цикл «СЧЕТЧИК»

Блок – схема

Программа   REM алгоритм цикл. стр. Цикл Счетчик FOR- NEXT REM табулирование функции DIМ A, B0, D, Bi, Yi, i INPUT “B0, D, A”; B0, D, A FOR i = 1 TO 5 Bi = B0 - D * i: Bi1= B0 + D * (i + 1) Yi = (0.27+Bi) ^ (1/ 3) + SIN(Bi – 4 *A) / (1- LOG(Bi1)) PRINT “Y“; I; “=“; Yi NEXT i END

Результат выполнения программ: DL? 0.3 _ Y1 = 7.841378E-03 Y2 = 5.905402E-03 Y3 =.5958232 Y4 =.9987214 Y5 =.5284869

ЗАДАНИЕ III Б: разработать алгоритм циклической структуры и составить программу вычисления суммы.

, где ,

Решение: обозначим s →S, xi → XI, x0 → X0, h→H, i →I

1. Цикл «ПОКА»

Блок – схема

	G = 0

_

+

Программы   REM алг. цикл. стр. Цикл Пока WHILE - WEND REM вычисление суммы DIМ A, G, D, XK, GK, K INPUT “ D, A”; D, A K = 3 G = 0 WHILE K < = 21 XK = D * K GK = COS((XK + A) ^ 2) G = G+G K: K = K+ 2 WEND PRINT “G = ”; G END   REM алгоритм цикл. стр. Цикл Пока DO - LOOP REM вычисление суммы DIМ A, G, D, XK, GK, K INPUT “ D, A”; D, A K = 3 G = 0 DO WHILE K < = 21 XK = D * K GK = COS((XK + A) ^ 2) G = G+G K: K = K+ 2 LOOP PRINT “G = ”; G END

2 Цикл «До»

k = k +2  

Блок – схема

	G = 0

-

+

Программа   REM алгоритм цикл. стр. Цикл До DO-LOOP REM вычисление суммы DIМ A, G, D, BK, YK, K INPUT “ D, A”; D, A K = 3 G = 0 DO XK = D * K GK = (COS (XK + A) + SQR (ABS (1 – XK))) ^ 2 G = G+GK K = K+ 2 LOOP UNTIL K > 21 PRINT “G = ”; G END

3 Цикл «СЧЕТЧИК»

Блок – схема

		G = G + Gk

Программа   REM алгоритм цикл. стр. Цикл Счетчик FOR- NEXT REM вычисление суммы DIМ A, G, D, BK, YK, K INPUT “ D, A”; D, A G = 0 FOR K = 3 TO 21 STEP 2 XK = D * K GK = (COS (XK + A) + SQR(ABS(1–XK))) ^ 2 G = G + GK NEXT K PRINT “G = ”; G END

Результат выполнения программ D, A?_.2, 43 G = 28.14528

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

Одесская государственная академия строительства и архитектуры

Дата добавления: 2015-12-08