Языки программирования  

 

Язык программирования Basic
Автор Томас Куртц (Thomas Eugene Kurtz, 22.02.1928)
Джон Кемени (Kenneth Eugene Iverson, 17.12.1920 - 19.10.2004)

 

История

BASIC (Beginner's All-purpose Symbolic Instruction Code) был разработан Томасом Куртцем и Джоном Кемени, сотрудниками Дартмутского колледжа, в начале 60-х гг. Целью разработчиков было создать простой в использовании язык программирования, в особенности для студентов не технических специальностей. Для увеличения эффективности вычислений BASIC был реализован как интерактивный язык, причём это было сделано задолго до того, как режим разделения времени стал стандартом системной архитектуры. BASIC также является ярким примером внутренне противоречивого языка программирования. Те, кто критикует этот язык, повторяют шутку, что BASIC - это оксиморон из одного слова. Хотя синтаксис языка BASIC очень прост в изучении, однако при попытке написать программу длиной более одной страницы сложность соединения компонентов программы в единое целое делает получающийся код совершенно нечитаемым. Именно по этой причине в следующие версии BASIC были внесены изменения, связанные с допущением более длинных имен переменных, включением в язык имен подпрограмм и увеличением гибкости структур управления. Эти изменения привели к тому, что BASIC стал похож скорее на язык типа Pascal и FORTRAN, чем на свой исходный простой вариант образца 60-х гг.

Возможности

Язык с чрезвычайно простыми синтаксисом и семантикой: пронумерованные операторы, имена переменных, состоящие из одной буквы и цифры, простой оператор IF, цикл FOR и оператор GOSUB для вызова подпрограммы.

Пример

Программа, вычисляющая сумму I2 + 22 + ... + 102


100   REMARK S IS SUM; I IS INDEX
200   LET S=0
300   FOR i=1 TO 10
400   LET S = S +i*1
500   NEXT i
600   REMARK NEXT IS END OF LOOP
700   PRINT "SUM IS ", S
800   STOP
900   REMARK OTHER STATEMENTS: IF S>400 THEN 200 - (branch to 200)
1000  REMARK OTHER STATEMENTS: DIM A(20) - A array of 20
1100  REMARK OTHER STATEMENTS: GOSUB 100: RETURN - Subroutines
1200  REMARK OTHER STATEMENTS: READ A-Input