Оператор WHILE-WEND-итерационный цикл 1

Операторы WHILE(покa)-WEND (конец) используются длямногократного выполнения заданной последовательности операторов, заключенных в этомблоке, если количество циклов заранее не известно.

Формат записи оператора WHILE-WEND:

WHILE условие

…………………

тело цикла

WEND

где

Условие — это выражение Бейсика, которое может быть оценено как истинное или ложное. Операторы тела цикла выполняются до тех пор, пока условие истинно (не равно нулю). Выход из блока следует, еслиусловие ложно (равно нулю).

Еслиусловие является условием равенства, например А=В, то при выполнения цикла WHILE-WEND сначала проверяетсяусловие, а затем в зависимости от результата проверки выполняется или не выполняется тело цикла.

Еслиусловие является условием неравенства, например А<>В, то при выполнении цикла WHILE-WEND сначала выполняется тело цикла, а затем проверяетсяуcловие, заданное в операторе WHILE.

После выхода из цикла выполняется оператор, следующий за оператором WEND.

Если в блоке не указаны операторы WHILE или WEND, то система выдает сообщение об ошибке

WHILE без WEND или WEND без WHILE

Пример. Определить количество итераций, при котором будет выполняться равенство с точностью до 0,001:

S = 0 'Присвоить начальное значение S

N = 0 'Присвоить начальное значение N

WHILE ABS(2 - S) >=.001 'Начало итерационного цикла

S = S + (1 / 2 ^ N) 'Вычисление очередного приближения

N = N + 1 'Изменение переменной N

WEND 'Конец цикла

PRINT "S="; S 'Вывод результата на экран

PRINT "N="; N '

END