Назад к списку статей

Вот примеры самых простых программ. Если вы сможете в них разобраться то считайте что основы языка BASIC вы поняли.


PRINT "Что такое переменная?"
PRINT "Это выделенный программой блок (кусочек) памяти."
PRINT "Имя переменной это название этого блока"
PRINT "Значение переменной, это то что хранися в этом блоке"
A = 10
PRINT "A - это имя. 10 - это значение."
PRINT "Print A - выводит значение A на экран"
PRINT A


PRINT "Символьная переменная имеет в конце имени знак $"
PRINT "В символной переменной хранятся символы, слова или предложения."
GOROD$ = "МОСКВА"
PRINT "GOROD$ - это имя переменной. МОСКВА - это ее значение."
PRINT "Print GOROD$ - выводит значение переменной на экран"
PRINT GOROD$


А это простая арифметика
REM Простое сложение
CLS
A = 5.356: B = 7.179
S = A + B
PRINT "Сумма A + B = "; A + B
PRINT "А можно так"
PRINT A
PRINT "+"
PRINT B
PRINT "-------"
PRINT S
PRINT "Или так"
PRINT A; " + "; B; " = "; S


REM Умножение
INPUT "Введи два числа "; A, B
PRINT "Произведение равно = "; A * B
P = A * B
PRINT "Или так. P = "; P


REM Операции со строками
INPUT "Введите имя"; IM$
INPUT "Введите фамилию"; FAM$
F$ = IM$ + " " + FAM$
PRINT "Полное имя: "; F$; " Длина имени = "; LEN(F$)


REM Одномерный массив: список класса
DIM KLASS$(5)
FOR I = 1 TO 5
PRINT "Введите имя "; I; "- ученика ": INPUT KLASS$(I)
NEXT I
REM Вывод списка
FOR I = 1 TO 5
PRINT I; "-й ученик это -"; KLASS$(I)
NEXT I


REM Двумерный массив. Матрица
DIM M(5, 5): REM Объявление
REM Заполнение
FOR I = 1 TO 5
FOR J = 1 TO 5
PRINT "Введи элемент "; I; "-столбец "; J; "-строка": INPUT M(I, J)
NEXT J
NEXT I
PRINT "Матрица": REM Вывод
FOR I = 1 TO 5
FOR J = 1 TO 5
PRINT M(I, J); " ";
NEXT J
PRINT
NEXT I


REM Графика. Точки на экране.
SCREEN 7
DO
PSET (400*RND, 400*RND),10*RND
LOOP WHILE INKEY$ = ""