Старый добрый BASIC за 10 минут. Часть 1.

Сегодня я хочу рассказать вам о BASIC'е, причём не Visual Basic, а о Darthmouth BASIC! Возможно, вы о нём не слышали, но это - самая первая верися BASIC'а!

Для начала обычаая программа Hello, world!:

10 CLS

20 PRINT "Hello, world!"

Вроде, не сложно? Но вот вопрос, а для чего 10?

Всё просто! Всё дело в том, что для операции GOTO(мы о ней с вами ещё поговорим...) нужна была метка, а эта самая десятка(или другое число), использовалась как эта метка. Ну а ещё от этого зависел порядок исполнения переменных.

CLS - очищает экран

PRINT - выводит текст в консоль

Комментарии:

В Darthmouth BASIC были только однострочные комметарии. Вот пример:

10 REM Это однострочный комметарий

20 PRINT "Привет!" REM выведет "Привет!"

Комментарии никак не влияют на программу!

Переменные:

Это тоже просто. Сначала объявляем переменную:

10 DIM a%

Процент(%) в конце названия обозначает тип int(integer - целочисленный). Вот все типы в BASIC'е:

% - целое число

$ - строка(неограниченной длины)

# - дробная двойной точности

! - дробная единичной точности

& - длинное целое число
Присваивание значения переменной:

20 LET a% = 15

И вывод переменной:

30 PRINT a%

Цикл WHILE:

Что если мы хотим вывести все числа от 1 до 10? Да мы можем это сделать вручную, но а что, если на до 10, а до 10 000? Или 1 000 000? и т.д.

Для этого есть циклы. Сейчас мы рассмотрим цикл WHILE, который выполняет действие, пока условие в нём правдиво. Пример:

10 CLS
20 DIM a%

30 LET a% = 0

40 WHILE a% < 10

50 PRINT a%

60 LET a% = a% + 1

70 WEND

В данном случае тело цикла(PRINT a% и LET a% = a% + 1) выполняются пока условие a% < 10 правдиво.

В следующей статье я расскажу о GOTO, FOR и массивах