использовать оператор CASE для сообщения
'олнения используются и процедура и функция.
SUB Управление (Выб%,Пусто%)
SELECT CASE Выб%
CASE 1
' использовать оператор CASE для сообщения пользователю чего-то о
'вводимом числе
SELECT CASE Пусто%
CASE<0
PRINT "Число меньше нуля"
'выити из оператора SELECT CASE
EXIT SELECT
CASE >0
PRINT "Число больше нуля"
EXIT SELECT
CASE ELSE
PRINT "Число равно нулю"
END SELECT
EXIT SUB
CASE 2
IF Пусто%<0 THEN
PRINT "Число меньше нуля"
EXIT IF
ELSEIF Пусто%>0 THEN
PRINT "Число больше нуля"
EXIT IF
ELSE
PRINT "Число равно нулю"
ENDIF
END SELECT PRINT "Вы выбрали число 2"
END SUB
DEF FN Циклы(Выб%)
'Параметр подаваемый в функцию ,указывает какое EXIT будет ис-
'полняться .Каждая цикловая структура делает одно и то же,чтобы
'продемонстрировать как может использоваться EXIT для завершения
'исполнения цикла.Мы также демонстрируем как можно использовать
'EXIT для выхода из функции.EXIT DEF используется для выхода из
'первых двух случаев выбора.Это предотвращает исполнение опера-
'торов вывода на экран.
'назначить значение результату функции
FNциклы=-1
SELECT CASE Выб%
CASE 1
'использовать EXIT ,чтобы оставить этот цикл,вместо того,чтобы
'позволить ему завершится нормально
FOR I%=1 TO 32767
PRINT RND(Пусто%)
EXIT FOR
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий