QBASIC

QBasic fue creado en 1991 con el objeto de reemplazar al BASICA y GW-BASIC como un lenguaje de programación para el usuario final. Fue basado en el anterior compilador QuickBASIC 4.5 pero sin los elementos del compilador y del enlazador del QuickBASIC. La versión 1.0 fue despachada junto con el MS-DOS 5.0 y posteriores, así como con Windows 95, Windows NT 3.x, y Windows NT 4.0. IBM recompiló el QBasic y lo incluyó en PC-DOS 5.x, así como desde el OS/2 2.0 en adelante.^[7]​ El eComStation, descendiente del código del OS/2, incluye el QBasic 1.0. El QBasic 1.1 es incluido con el MS-DOS 6.x, y, sin el EDIT, en Windows 95, Windows 98 y Windows Me.

Microsoft lo incluyó como opcional en los discos de instalación de Windows 95 y Windows 98, incluido en el paquete olddos.exe, pero dejó de distribuir QBASIC en siguientes versiones de Windows. Comenzando con Windows 2000, Microsoft ya no incluye QBasic.^[8]​ (Sin embargo, algunas versiones localizadas del Windows 2000 y Windows XP todavía lo tienen, y puede ser entregado como freeware). Actualmente es distribuido únicamente a través del sitio web de Microsoft para usuarios con licencia de uso de MS-DOS.

QBasic (así como el MS-DOS Editor incorporado) es compatible hacia atrás con los lanzamientos del DOS antes de 5.0 (hasta por lo menos el DOS 3.20). Sin embargo, si es usado en cualquier computador de 8088/8086, o en algunos computadores 80286, el programa QBasic puede correr muy lentamente, o quizás en absoluto, debido a su tamaño en la memoria. Hasta el MS-DOS 7, el MS-DOS Editor requería al QBasic. El programa "edit.com" simplemente comienza QBasic en modo de edición solamente, y este modo puede también ser entrado corriendo QBASIC.EXE con el swiche /EDIT (es decir, la línea de comando "QBASIC /EDIT").

Con posterioridad han aparecido productos que continuaban el estándar QBASIC/QuikBASIC, entre ellos el PowerBASIC, el FreeBASIC y el QB64/QB32.^[9]​

Los ejemplos que se pueden presentar de programas escritos en este lenguaje son muchos, veamos algunos que nos permiten ver el formato de este lenguaje de programación.

QBasic vino completo con cuatro programas de ejemplo escritos de antemano. Estos eran "Nibbles" (una variante del juego Snake), "gorilas", un juego de artillería, "MONEY MANAGER", manejador de finanzas personales y un "RemLine", un programa removedor de número de líneas para código de GW-BASIC.^[1]​

El siguiente es un muy sencillo programa de "hola mundo" escrito en QBASIC:

PRINT "Hola Gente"INPUT "Ingrese Su Nombre: "; Nombre$PRINT "Su Nombre es: " + Nombre$ 'Esto es un comentario

Programa para resolver una ecuación de segundo grado:

${\displaystyle Ax^{2}+Bx+C=0\,}$

CLSPRINT " Resolución de una ecuación de segundo grado"PRINT " Ax^2 + Bx + C = 0"PRINTINPUT " Coeficiente A: ", AINPUT " Coeficiente B: ", BINPUT " Coeficiente C: ", CPRINTIF A = 0 THEN    REM A = 0    IF B = 0 THEN        REM A = 0 Y B = 0        IF C = 0 THEN            REM A = 0, B = 0 Y C = 0            PRINT " Sin ecuación"        ELSE            REM A = 0, B = 0, C <> 0            PRINT C; "= 0, Imposible"        END IF    ELSE        REM A = 0, B <> 0        PRINT " Ecuación de primer grado"        PRINT " X="; -C / B "    END IFELSE    REM A <> 0    D = B ^ 2 - 4 * A * C    IF D > 0 THEN        REM A <> 0, D > 0        PRINT " Dos soluciones reales"        PRINT " X1="; (-B + SQR(D)) / (2 * A)        PRINT " X2="; (-B - SQR(D)) / (2 * A)    ELSE        REM A <> 0, D <= 0        IF D = 0 THEN            REM A <> 0, D = 0            PRINT " Solución real única"            PRINT " X1=X2="; -B / (2 * A)        ELSE            REM A <> 0, D < 0            R = -B / (2 * A)            I = ABS(SQR(-D) / (2 * A))            PRINT " Raíz compleja"            PRINT " X1= "; R; "+"; I; "i"            PRINT " X2= "; R; "-"; I; "i"        END IF    END IFEND IF

Este programa contempla el siguiente árbol de decisión:

${\displaystyle ax^{2}+bx+c=0\left\{{\begin{array}{ll}a=0&\left\{{\begin{array}{ll}b=0&\left\{{\begin{array}{ll}c=0&\longrightarrow Sin\;ecuaci{\acute {o}}n\\\\c\neq 0&\longrightarrow Imposible\end{array}}\right.\\\\b\neq 0&\longrightarrow \;Ecuaci{\acute {o}}n\;de\;1^{e}\;grado\end{array}}\right.\\\\a\neq 0&\left\{{\begin{array}{ll}b^{2}-4ac<0&\longrightarrow Ra{\acute {\imath }}z\;compleja\\\\b^{2}-4ac=0&\longrightarrow Soluci{\acute {o}}n\;real\;{\acute {u}}nica\\\\b^{2}-4ac>0&\longrightarrow Dos\;soluciones\;reales\end{array}}\right.\end{array}}\right.}$

Resolviendo en cada caso los valores de x que cumplen la ecuación, se emplea la instrucción IF para seleccionar el caso concreto y realiza las operaciones oportunas, presentando según el caso la solución de x que cumple la ecuación, contemplándose casos extremos como: a=0, b=0, c=0.

• BASICA
• GW-BASIC
• QuickBASIC
• Microsoft BASIC
• BASIC
• Lenguaje de programación
• Programación

1.   La referencia utiliza el parámetro obsoleto |mes= (ayuda); La referencia utiliza el parámetro obsoleto |coautores= (ayuda)
2.   La referencia utiliza el parámetro obsoleto |mes= (ayuda)
3.   La referencia utiliza el parámetro obsoleto |mes= (ayuda)
4.   La referencia utiliza el parámetro obsoleto |mes= (ayuda)
5.   La referencia utiliza el parámetro obsoleto |mes= (ayuda)

• Página de MS para bajar el programa, compilador
• Tutorial de QBasic en la Universidad de Oviedo
• Tutorial de QBasic en Monografias.com
• Tutorial de QBasic de BFH Software
• Curso de introducción a la programación con QBasic
• Códigos fuente de programas y juegos
• Grupo de discusión en castellano sobre el lenguaje BASIC
• Página de Vetusware para bajar el programa y compilador QBasic v1.1 Español