Студопедия — Оператор GOSUB..RETURN
Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Оператор GOSUB..RETURN






 

Основную программу можно направить на выполнение подпрограммы с помощью операторов GOSUB и ON...GOSUB. Подпрограмма возвращается в основную программу с помощью оператора RETURN, который возвращает программу туда, откуда она ушла по оператору GOSUB.

Пример:

 

SCREEN 12 algus: PRINT "1. Рисуем круг" PRINT "2. Рисуем прямоугольник" PRINT "3. Рисуем круг и прямоугольник" PRINT "4. Выйди из программы" INPUT I CLS IF I = 1 THEN GOSUB ring 'запускаем процедуру круг IF I = 2 THEN GOSUB kast 'запускаем процедуру прямоугольник IF I = 3 THEN GOSUB molemad 'запускаем процедуру круг и прямоугольник IF I = 4 THEN END 'программа закончена GOTO algus ring: CIRCLE (320, 200), 100 RETURN 'возврат в основную программу kast: LINE (200, 200)-(300, 250),, B RETURN ' возврат в основную программу molemad: GOSUB ring ''запускаем процедуру круг GOSUB kast ''запускаем процедуру прямоугольник RETURN ''' возврат в основную программу

 

Заметим, что оператор GOSUB не может быть без RETURN. Иначе будет ошибка. Отметим также, что одна процедура может вызывать другую. Например в процедуре- molemad).

 

Используем в последней программе оператор ON...GOSUB:

  SCREEN 12 algus: PRINT "1. Рисуем круг" PRINT "2. Рисуем прямоугольник" PRINT "3. Рисуем круг и прямоугольник" PRINT "4. Выход из программы" INPUT I CLS 'процедура выбирается в зависимости от значения I ON I GOSUB ring, kast, molemad, lopp GOTO algus ring: CIRCLE (320, 200), 100 RETURN 'возврат в основную программу kast: LINE (200, 200)-(300, 250),, B RETURN ''возврат в основную программу molemad: GOSUB ring GOSUB kast RETURN ''возврат в основную программу lopp: END RETURN

 

Значения переменной I могут быть 1, 2, 3 или 4.

 







Дата добавления: 2015-09-07; просмотров: 515. Нарушение авторских прав; Мы поможем в написании вашей работы!



Практические расчеты на срез и смятие При изучении темы обратите внимание на основные расчетные предпосылки и условности расчета...

Функция спроса населения на данный товар Функция спроса населения на данный товар: Qd=7-Р. Функция предложения: Qs= -5+2Р,где...

Аальтернативная стоимость. Кривая производственных возможностей В экономике Буридании есть 100 ед. труда с производительностью 4 м ткани или 2 кг мяса...

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

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

Ученые, внесшие большой вклад в развитие науки биологии Краткая история развития биологии. Чарльз Дарвин (1809 -1882)- основной труд « О происхождении видов путем естественного отбора или Сохранение благоприятствующих пород в борьбе за жизнь»...

Этапы трансляции и их характеристика Трансляция (от лат. translatio — перевод) — процесс синтеза белка из аминокислот на матрице информационной (матричной) РНК (иРНК...

Внешняя политика России 1894- 1917 гг. Внешнюю политику Николая II и первый период его царствования определяли, по меньшей мере три важных фактора...

Оценка качества Анализ документации. Имеющийся рецепт, паспорт письменного контроля и номер лекарственной формы соответствуют друг другу. Ингредиенты совместимы, расчеты сделаны верно, паспорт письменного контроля выписан верно. Правильность упаковки и оформления....

БИОХИМИЯ ТКАНЕЙ ЗУБА В составе зуба выделяют минерализованные и неминерализованные ткани...

Studopedia.info - Студопедия - 2014-2024 год . (0.012 сек.) русская версия | украинская версия