Mybrary.info
mybrary.info » Книги » Компьютеры и интернет » Прочая компьютерная литература » »Учебник QBasic» - Автор неизвестен (книги серия книги читать бесплатно полностью TXT) 📗

»Учебник QBasic» - Автор неизвестен (книги серия книги читать бесплатно полностью TXT) 📗

Тут можно читать бесплатно »Учебник QBasic» - Автор неизвестен (книги серия книги читать бесплатно полностью TXT) 📗. Жанр: Прочая компьютерная литература. Так же Вы можете читать полную версию (весь текст) онлайн без регистрации и SMS на сайте mybrary.info (MYBRARY) или прочесть краткое содержание, предисловие (аннотацию), описание и ознакомиться с отзывами (комментариями) о произведении.
Перейти на страницу:

  LINE INPUT #1, s$

  PRINT s$

  CLOSE

  Это читало бы полную строку из файла в переменную "s$". Только заново

  элемент, при использовании OUTPUT, это стирает то, что находится в файле.

  Четвертая глава на этом заканчивается. Вот задание:

  1.Сделать программу в которой нужно сгенерировать случайное число между 1 и   20. Дать играющему 5 шансов, и после того, как вы ввели число, программа должна сообщать высоко или низко введённое вами число.

  2.Сделать программу, которая бы сохраняла высшие результаты в файл.

  Замечательного дня!!!! :)))))

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

Глава ПЯТАЯ .  Привет !  В этой главе ,  мы изучим операторы :

  WHILE...WEND, Random Access Files, APPEND, GET (file I/O), SUB...END,  SUB, PUT(file I/O), FUNCTION...END FUNCTION, LEN, GOSUB...RETURN, TYPE...END, TYPE, DIM SHARED, COMMON SHARED, RTRIM$

  Чтож ,  приступим !  Мы изучим другой метод выполнения цикла, путь прибавления к концу последовательного файла, структурного программирования. Сначала вспомним прошлые способы выполнения цикла. Как вы помните DO...LOOP и FOR...NEXT, а сейчас мы изучим операторы WHILE...WEND. Этот оператор очень похож на цикл DO...UNTIL. Вот как выглядит синтаксис этого цикла:

  WHILE<условие>

  ... 

WEND

  Скажем, Вы хотите сделать простую игру в предположения. Всё, что требуется - простой цикл, как в этом примере:

  RANDOMIZE TIMER

 PRINT "Игра - угадай!"

 number = INT(RND * 10) + 1'случайное число от 1 до 10

 PRINT "Секретный номер находится в промежутке от 1 до 10"

  WHILE guess <> 10' цикл до предположения = 10

 INPUT "Попыток "; guess

 tries = tries + 1'счётчик попыток

  WEND

  PRINT "Хорошая работа! Вы угадали секретный номер с "; tries; "  попыт(ок),(ки)"

 END

  Эта программа составлена только в 10 строк! Вот задание - объясните, что делает каждая строча(как вы видите на некоторых строчках есть комментарии). Теперь вы поняли, как действует цикл WHILE...WEND, он простой, и все же полезный!

 Мы говорили относительно файлов в Главе 4. Вы помните команды INPUT и OUTPUT для последовательного входа в файл. Есть еще один способ добавления к файлу информации, используя команду APPEND. Команда используется точно так же как и OUTPUT и INPUT:

  OPEN "file.txt" FOR APPEND AS #1

  APPEND действует точно также как и OUTPUT и кроме этого не стирает то, что уже записано в файле, прежде чем добавлять к этому другой текст. Это полезно для продолжающихся высоких списков счета и связки других вещей.

  Сейчас мы должны изучить структурное программирование. Очень не удобно в большой программе с тысячами строк и множеством операторов найти проблему! Поэтому, умные люди в 1960-ых разработали кое-что называемое "структурным программированием - Ming. " При использовании этой методики, мы можем использовать "подпрограммы" и "функции" в создании наших программ, чтобы упорядочить программный текст.

 Чтобы создавать и редактировать подпрограмму в QBASIC, нажимают кнопку на инструментальной панели меню [E]dit(редактировать) > New [S]UB...(Новая подпрограмма...). QBASIC спросит у вас относительно имени подпрограммы. Можно давать любое имя. QBASIC тогда позволит вам редактировать текст подпрограммы. В тексте подпрограммы используются те же операторы что и в обычной программе, после того как вы написали подпрограмму, вы можете её посмотреть, идите к [V]iew на инструментальной панели, выберите [S]UBS. И затем выберите имя файла вашей подпрограммы в меню. Если Вы хотите вернуться к главному тексту программу, то, выберете в этом же меню название вашей программы. Знайте, что переменные, которые Вы создаете в подпрограмме доступный только в этой же подпрограмме, а переменные в теле программы доступны только в нём, сделать их общедоступными можно с использование следующая команда в начале подпрограммы:

  COMMON SHARED variable$, variable2, variable3!

  Команда "DECLARE SUB...", объявляет имя подпрограммы и её существование.(QBASIC размещает эти инструкции в начале вашей программы, как только вы сохраняете её). Сделать переменную доступной везде можно так (используя в задании переменной оператора SHARED):

  DIM SHARED array$(100)

  Удостоверитесь, что любые переменные(называемые "глобальной переменной") находятся в вашей команде COMMON SHARED, иначе ваша программа будет работать с ошибками. Передают переменные к подпрограмме подобно этому:

  SUB DoBox (x1, y1, x2, y2)

  Чтобы вызвать подпрограмму нужно написать имя подпрограммы и задать численное значение переменных(если они есть) подобно этому:

  DoBox 30, 20, 50, 20

  Если же нет переменных вы просто можете только напечатать название подпрограммы в основном тексте программы(теле), подобно этому(здесь вызывается сразу 5 попрограмм):

Перейти на страницу:

Автор неизвестен читать все книги автора по порядку

Автор неизвестен - все книги автора в одном месте читать по порядку полные версии на сайте онлайн библиотеки mybrary.info.


»Учебник QBasic» отзывы

Отзывы читателей о книге »Учебник QBasic», автор: Автор неизвестен. Читайте комментарии и мнения людей о произведении.


Уважаемые читатели и просто посетители нашей библиотеки! Просим Вас придерживаться определенных правил при комментировании литературных произведений.

  • 1. Просьба отказаться от дискриминационных высказываний. Мы защищаем право наших читателей свободно выражать свою точку зрения. Вместе с тем мы не терпим агрессии. На сайте запрещено оставлять комментарий, который содержит унизительные высказывания или призывы к насилию по отношению к отдельным лицам или группам людей на основании их расы, этнического происхождения, вероисповедания, недееспособности, пола, возраста, статуса ветерана, касты или сексуальной ориентации.
  • 2. Просьба отказаться от оскорблений, угроз и запугиваний.
  • 3. Просьба отказаться от нецензурной лексики.
  • 4. Просьба вести себя максимально корректно как по отношению к авторам, так и по отношению к другим читателям и их комментариям.

Надеемся на Ваше понимание и благоразумие. С уважением, администратор mybrary.info.


Прокомментировать
Подтвердите что вы не робот:*