Программа. S = 0 ' задание начального значения суммы S

REM цикл For…Next

CLS

S = 0 ' задание начального значения суммы S

FOR x = 1 TO 10 STEP.1 ' ввод параметров цикла

Y = SIN(х)^3 ' вычисление у = sin³x

S = S + Y ' прибавление текущего у к предыдущему S

NEXT x ' переход к началу цикла – следующему х

PRINT " S=", S

END

 

Описание программы:

До начала цикла вводится начальное значение суммы S = 0. К нему будут добавляться все значения функции у = sin(х), поэтому, чтобы итоговая сумма не искажалась, оно должно быть равно нулю.

Затем оператором FOR аргументу х присваивается первое значение, равное 1, вычисляется Y = sin³x = 0, 59 и сумма S = S + Y как S = 0 + 0, 59, потом NEXT х передаёт управление строке FOR, где х увеличивается на приращение 0, 1 и становится равным 1, 1. Вычисляется значение функции при новом х = 1, 1 (т.е. Y = 0, 707) и прибавляется к предыдущему значению S (S = 0, 59 + 0, 707 = 1, 297, затем NEXT x снова возвращает процесс вычисления на FOR, где х увеличивается на 0.1 и т.д. Последний раз цикл будет просчитан при х = 10, потом значение накопленной суммы S выводится на экран и - конец программы. Если бы оператор PRINT стоял внутри цикла (например, после вычисления S = S + Y, Ио на печать выводились бы все промежуточные значения суммы S.

Та же программа с оператором цикла WHILE…WEND примет вид:

 

CLS ' очистка экрана

х = 1: S = 0 ' задание начальных значений х = 1и S = 0

WHILE x < = 10 ' проверка условия: пока х ещё < = х_кон = 10

Y = SIN(х)^3 ' вычисление у = sin³x

S = S + Y ' прибавление текущего у к предыдущему S

х = х + 0.1 ' увеличение х на шаг 0.1

WEND ' возврат к началу цикла - WHILE…

PRINT " S ="; S ' вывод на экран S

END

Пример 3 Вычислить с помощью оператора цикла и вывести на печать произведение положительных значений функции p = е^4x, где х изменяется от 0.1 до 0.5 с шагом 0.1

Программа с оператором FOR…NEXT примет вид:

CLS

p = 1' присвоение 1 начальному р

FOR x = 0.1 TO 0.5 STEP.1 ' ввод параметров цикла

Y = ЕХР(4*х) ' вычисление у = e^4х

p = p*Y ' умножение текущего у на предыдущее р

NEXT x ' переход к началу цикла – следующему х

PRINT " p=", p

END

 

Пример 4 Вычислить сумму первых 20 членов ряда

S = при х=1.05.

В общем виде i-тый член ряда можно записать как ,

где N – числитель, который увеличивается через 2,

k – показатель степени при х, увеличивающийся на 1.

Обозначим символом m счётчик слагаемых (челнов ряда) для определения конца цикла при m = 20.