WSbank.BIZ все для зарабтка в сети Сайт мгновенных лотерей RuPaid.net

5ROZ.ru - Бесплатная доставка цветов по Москве. Заказ цветов круглосуточно. Бизнес букет, свадебный букет невесты, Бесплатные открытки с Вашим текстом, поздравления с днем рождения и юбилеем цветы и подарки к 8 марта. Заказ и доставка букетов на день святого Валентина


И З У Ч А Е М B A S I C
ОПЕРАТОРЫ

Print

Cls

Input

Input$

Rnd

If ... Then...

Color

Screen

Line, Pset

Circle

Paint

Inkey$

Get, Put

Open

Line Open

Eof

Close

Sub

Call

Хотите заработать денег в Интернете? Тогда ваш путь лежит на этот сайт.

http://www.5roz/ru/
     Главная страица     Справочник      Программы  



Раздел 1.

Среда програмирования Quic Basic.

_______Для програмирования с помощью языка Quick Basic Вам понадобится программа Quick Basic ( СКАЧАТЬ ). После запуска программы на экране появится картинка. Основное поле (как правило, оно голубого цвета) называется окном редактора, в этом окне мы будем набирать тексты наших программ. В верхней строке экрана расположено главное меню Quick Basic . В середине следующей строке расположенно имя программы, то есть имя файла этой программы. Теперь познакомимся с пунктом File: New Program - перейти к набору ново программы; Open Program - загрузить готовую программу; Save As - сохранить программу; Exit - выйти из среды программирования Quick Basic .

Простейшая программа: вывод текста.


_______ Для вывода текста на экран используется оператор Print "текст".

П р и м е р CLS
PRINT "Вывод текста"

_______ Перевод на английский язык в Бэйсики осуществляется немного по другому, в отличии от доброго Window, так для перевода на английский язык используйте Ctrl(левый)+Shift(левый), а на русский - Ctrl(правый)+Shift(правый).
_______Суть оператора CLS заключается в отчистки экрана.Он очень полезен во время редоктирвания программы или ее налаживания, так как при повторном запуске программы на экране выводится не только новые данные, но и старые данные(во всем есть свои недостатки).Редактор в Бэйсики особенный - "думающий". После того как набрана строка и нажата клавиша ввода, выполняется проверка правильности написсанного. При наличии ошибки редактор сообщит Вам об этом и мало того выделит то место, где вы совершили ошибку.
_______Для сохранения программы на диске выйдем в главное меню, раскроем пункт File и выберем Save As... В открывшемся окне введите имя программы.

Операторы Input.


_______ОператорInputсписок переменных принимает числовые и текстовые значения с клавиатуры и присваивает их переменным из списка.Программа дойдя до оператора Input , выводит на дисплей знак вопроса и ждет ввода с клавиатуры.

П р и м е р CLS
Input x
Print x

Операторы Input$.


_______Оператор число вводит заданное число символов без их отображения на экране. Этот оператор удобно использовать при вводе пароля.
П р и м е р CLS
password$="aq"+chr$(8)+chr$(27)
If Input$(4)<>password$ Then Stop

_______Чтобы запустить основную программу, нужно нажать клавиши a и q, затем клавиши Baсkspase и Esc, коды которых (8 и27).

Оператор Rnd.

_______Случайное число - это число, величина которого не может быть заранее известна. В Quick Basic имеется функция Rnd, которая возвращает случайное значение из интервала (0;1). Но здесь есть небольшая хитрость, если выполнить эту програамму несколько раз, то можно обнаружить, что на экран выдается одна и та же последовательность чисел. Это происходит по тому, что на самом деле каждое следующее число получается из предыдущего по хитрой формуле. которая имитирует отсутствие закономерности в последовательности чисел. Чтобы получать разные последовательности, нужно при каждом запуске брать новую "затравку".
_______Randomize получается от функции Timer значение системного времеи и формирует "затравку" для Rnd. При следующем запуске программы функция Timer вернет другое значение и получится другая последовательность чисел.

П р и м е р Randomize Timer
For i=1 to 100
nstr=Int(25*Rnd)+1
npos=Int(80*rnd)+1
Locate nstr, npos:Print "*"
Next i

Оператор If...Then...


_______Это оператор разветвления, его синтаксис:
_______If выражение Then значение
_______If если Then то.Например, если х=1, то у=3;если выражение отрицательное, то у=4.

П р и м е р Cls
Input "Введите любое число",x
If x>=0 Then Print "Это число больше или равно нулю"
Print "Это число меньше нуля"
End



Если у Вас возникнут какие-либо вопросы или просто захотите связаться с автором этого сайта, то присылайте свои письма: E-mail:puh@ukrtop.com