Чтение онлайн

на главную - закладки

Жанры

Шрифт:

PRINT "Простите!"

INPUT " Второй выбор "; number

IF number = 3 THEN GOTO gotit

PRINT " Нет !"

INPUT " Последний

выбор
"; number

IF number = 3 THEN GOTO gotit

PRINT " Простите ! The number was 3!"

END

gotit: PRINT " Вы выиграли ! Хорошая работа !"

Основной элемент в этой программе - IF...THEN.

Последняя вещь в этой главе – изучение изменения цвета текста и других элементов. Цвет текста на экране позволяет менять команда COLOR (Включая Цвет фона). Вот пример использования этого оператора:

COLOR 13

PRINT "Сиреневый!"

COLOR 7

PRINT "Серый!"

Число, после оператора COLOR - один из этих номеров цвета:

00 - Сажа

08 - Тёмно - серый

01 – Темно - синий

09 – Светло - синий

02 – Тёмно – зеленый

10 - Светло - зеленый

03 – Тёмно - голубой

11 – Светло - голубой

04 – Темно - красный

12 - Светло - красный

05 –

Темно - пурпурный

13 - Сиреневый

06 - Цитрус

14 - Жёлтый

07 - Серый

15 – Ярко - белый

Это заканчивает наше обсуждение оператора COLOR и нашей главы. В этой главе узнали много нового.

УДАЧИ!!! И Хорошего вам дня!!!

Учебники: / QBasic №01 Глава 4 /

Глава Четвёртая. Привет! В этой главе, мы изучим следующие команды:

DO...LOOP, OPEN, INT, CLOSE, RANDOMIZE TIMER RND, PRINT#, SELECT...END, SELECT, INPUT # INKEY$

В предыдущей главе, мы говорили относительно циклов DO...LOOP, которые позволяют повторять действие некоторое количество раз. Окончание цикла при уловии:

Все, что вы должны сделать - написать, DO WHILE... или UNTIL..[какое-либо условие]. В переводе с английского это бы звучало так: ДЕЛАЙТЕ какое - либо ДЕЙТСТИЕ ДО ТОГО КАК ПРОИЗОЙДЁТ [какое-либо условие]

Обязательна команда LOOP, чтобы закончить цикл. Есть очень простой пример

из того, как использовать этот цикл:

DO UNTIL a = 10

try = try + 1

PRINT "Попробуйте номер"; try

PRINT

PRINT "Наберите секретный номер!"

INPUT "Введите"; a

LOOP

Это бы значило что цикл продолжался до набора числа 10. Эта команда очень простая, но бесконечно полезная. Отличие этого цикла от команды INPUT - не нужно нажимать клавишу "ENTER" после ввода числа. Сейчас программисты стремятся придерживаться этого в своих программах, а именно, в местах где написано "нажмите любую клавишу".

Поделиться:
Популярные книги

Барон меняет правила

Ренгач Евгений
2. Закон сильного
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Барон меняет правила

Жена со скидкой, или Случайный брак

Ардова Алиса
Любовные романы:
любовно-фантастические романы
8.15
рейтинг книги
Жена со скидкой, или Случайный брак

"Фантастика 2025-58". Компиляция. Книги 1-21

Альтмарк Лев
Фантастика 2025. Компиляция
Фантастика:
боевая фантастика
космическая фантастика
попаданцы
5.00
рейтинг книги
Фантастика 2025-58. Компиляция. Книги 1-21

Перстень Агируса

Левченко Виктория Эдуардовна
Детективы:
триллеры
8.16
рейтинг книги
Перстень Агируса

Гильдия. Компиляция 1-10

Бергер Евгений
Гильдия
Фантастика:
боевая фантастика
альтернативная история
5.00
рейтинг книги
Гильдия. Компиляция 1-10

Дневники 1932-1947 гг

Бронтман Лазарь Константинович
Документальная литература:
биографии и мемуары
5.00
рейтинг книги
Дневники 1932-1947 гг

Имперец. Том 1 и Том 2

Романов Михаил Яковлевич
1. Имперец
Фантастика:
попаданцы
альтернативная история
аниме
5.00
рейтинг книги
Имперец. Том 1 и Том 2

Стеллар. Трибут

Прокофьев Роман Юрьевич
2. Стеллар
Фантастика:
боевая фантастика
рпг
8.75
рейтинг книги
Стеллар. Трибут

Осколки (Трилогия)

Иванова Вероника Евгеньевна
78. В одном томе
Фантастика:
фэнтези
8.57
рейтинг книги
Осколки (Трилогия)

Бессонный патруль (сборник)

Максимовский Эдвард
Приключения:
прочие приключения
5.00
рейтинг книги
Бессонный патруль (сборник)

Хроники былого и грядущего

allig_eri
Фантастика:
фэнтези
попаданцы
5.00
рейтинг книги
Хроники былого и грядущего

Стена глаз. Земля - пустыня. Флаг в тумане

Мацумото Сэйте
Мастера остросюжетного детектива
Детективы:
прочие детективы
5.00
рейтинг книги
Стена глаз. Земля - пустыня. Флаг в тумане

История политических и правовых учений. Учебник

Коллектив авторов
Научно-образовательная:
история
юриспруденция
5.00
рейтинг книги
История политических и правовых учений. Учебник

Битва в кружке пива

Дубровный Анатолий Викторович
Фантастика:
фэнтези
6.80
рейтинг книги
Битва в кружке пива