Cumpleaños Feliz BASIC. Hace 50 años

Este 1 de mayo, celebramos el cumpleaños 50 de BASIC (Beginner's All-purpose Symbolic Instruction Code - Código simbólico de instrucciones de propósito general para principiantes).

Este lenguaje de programación fue desarrollado en 1964 por John George Kemeny y Thomas Eugene Kurtz, y fue concebido para que estudiantes resuelvan problemas de programación en un lenguaje simple y básico.

Captura de pantalla de BASIC ejecutándose en un Commodore

Se desarrollaron variantes del lenguaje para adaptarlos a los Sistemas Operativos existentes en esos momentos, como ejemplo tenemos la estructura de un programa en Applesoft BASIC:

10 INPUT "Cuál es su nombre:"; NN$
20 PRINT "Bienvenido al 'asterisquero' ";NN$
25 PRINT
30 INPUT "con cuántos asteriscos inicia [Cero sale]:"; N
40 IF N<=0 THEN GOTO 200
50 AS$=""
60 FOR I=1 TO N
70 AS$=AS$+"*"
80 NEXT I
90 PRINT "AQUI ESTAN:"; AS$
100 INPUT "Desea más asteriscos:";SN$
110 IF SN$="" THEN GOTO 100
120 IF SN$<>"S" AND SN$<>"s" THEN GOTO 200
130 INPUT "CUANTAS VECES DESEA REPETIRLOS [Cero sale]:"; VECES
140 IF VECES<=0 THEN GOTO 200
150 FOR I=1 TO VECES
160 PRINT AS$;
170 NEXT I
180 PRINT
185 REM A repetir todo el ciclo (comentario)
190 GOTO 25
200 END