Diferencias
Muestra las diferencias entre dos versiones de la página.
| Ambos lados, revisión anteriorRevisión previaPróxima revisión | Revisión previa | ||
| tutorial_basico_de_basic [2023/09/23 19:33] – [Introduce un nuevo programa de BASIC] peron | tutorial_basico_de_basic [2026/04/21 16:08] (actual) – editor externo 127.0.0.1 | ||
|---|---|---|---|
| Línea 12: | Línea 12: | ||
| Empecemos mecanografiando un programa de una sola instrucción: | Empecemos mecanografiando un programa de una sola instrucción: | ||
| - | <code freebasic> | + | <file freebasic |
| 10 PRINT "HOLA TERCER MUNDO!" | 10 PRINT "HOLA TERCER MUNDO!" | ||
| - | </code> | + | </file> |
| En la mayoría de los dialectos más clásicos de BASIC, cada instrucción debe estar numerada, y la computadora sigue las instrucciones de acuerdo a esta secuencia de números. | En la mayoría de los dialectos más clásicos de BASIC, cada instrucción debe estar numerada, y la computadora sigue las instrucciones de acuerdo a esta secuencia de números. | ||
| Línea 24: | Línea 24: | ||
| Probemos ahora introducir una //constante numérica// cualquiera. Para ello usamos la orden LET (" | Probemos ahora introducir una //constante numérica// cualquiera. Para ello usamos la orden LET (" | ||
| - | <code freebasic> | + | <file freebasic |
| 10 LET N = 3 | 10 LET N = 3 | ||
| 20 PRINT N | 20 PRINT N | ||
| - | </code> | + | </file> |
| Ahora haz lo mismo, pero introduce una //constante de cadena de caracteres// | Ahora haz lo mismo, pero introduce una //constante de cadena de caracteres// | ||
| - | <code freebasic> | + | <file freebasic |
| 10 LET N$ = "HOLA TERCER MUNDO!" | 10 LET N$ = "HOLA TERCER MUNDO!" | ||
| 20 PRINT N$ | 20 PRINT N$ | ||
| - | </code> | + | </file> |
| También podrás utilizar '' | También podrás utilizar '' | ||
| - | <code freebasic> | + | <file freebasic |
| 10 LET N=5+1-2 | 10 LET N=5+1-2 | ||
| 20 PRINT N | 20 PRINT N | ||
| - | </code> | + | </file> |
| ...esto nos permitiría obtener el resultado de la ecuación, y no la ecuación en sí. | ...esto nos permitiría obtener el resultado de la ecuación, y no la ecuación en sí. | ||
| Línea 47: | Línea 47: | ||
| También podrás usar BASIC para operar con varias // | También podrás usar BASIC para operar con varias // | ||
| - | <code freebasic> | + | <file freebasic |
| 10 LET Q=10/2 | 10 LET Q=10/2 | ||
| 20 LET P=3*5 | 20 LET P=3*5 | ||
| 30 PRINT Q;P;P/Q | 30 PRINT Q;P;P/Q | ||
| - | </code> | + | </file> |
| ...lo que nos dará el resultado de Q, de P, y el resultado de la división de P por Q. | ...lo que nos dará el resultado de Q, de P, y el resultado de la división de P por Q. | ||
| Línea 57: | Línea 57: | ||
| BASIC también incluye '' | BASIC también incluye '' | ||
| - | <code freebasic> | + | <file freebasic |
| 10 PRINT "ELIGE UN NUMERO" | 10 PRINT "ELIGE UN NUMERO" | ||
| 20 INPUT X | 20 INPUT X | ||
| 30 PRINT " | 30 PRINT " | ||
| - | </code> | + | </file> |
| También podemos hacer un bucle o bifurcación en el órden de ejecución, con la orden '' | También podemos hacer un bucle o bifurcación en el órden de ejecución, con la orden '' | ||
| - | <code freebasic> | + | |
| + | <file freebasic | ||
| 10 PRINT "HOLA TERCER MUNDO" | 10 PRINT "HOLA TERCER MUNDO" | ||
| 20 GOTO 10 | 20 GOTO 10 | ||
| - | </code> | + | </file> |
| En cualquier caso podrás detener la ejecución del bucle con **Ctrl+c**. | En cualquier caso podrás detener la ejecución del bucle con **Ctrl+c**. | ||
| Línea 74: | Línea 75: | ||
| También podrás programar algo mas complejo. Veamos este ejemplo, donde se usa '' | También podrás programar algo mas complejo. Veamos este ejemplo, donde se usa '' | ||
| - | <code freebasic> | + | <file freebasic |
| - | 9 REM J ES LA CANTIDAD DE JUGADORES | + | 9 REM X ES LA CANTIDAD DE JUGADORES |
| - | 10 LET J=4 | + | 10 LET X=4 |
| 20 PRINT " | 20 PRINT " | ||
| 30 PRINT " | 30 PRINT " | ||
| 39 REM DATOS DE 5 TEMPORADAS | 39 REM DATOS DE 5 TEMPORADAS | ||
| 40 READ N$, | 40 READ N$, | ||
| - | 50 DATA A. RATTIN, | + | 50 DATA A.RATTIN, |
| - | 60 DATA R. MOUZZO, | + | 60 DATA R.MOUZZO, |
| - | 70 DATA L. ARTIME, | + | 70 DATA L.ARTIME, |
| - | 80 DATA C. TEVEZ, | + | 80 DATA C.TEVEZ, |
| 90 A=(T1+T2+T3+T4+T5)/ | 90 A=(T1+T2+T3+T4+T5)/ | ||
| 100 PRINT N$,A | 100 PRINT N$,A | ||
| 109 REM CONTINUA BUCLE | 109 REM CONTINUA BUCLE | ||
| - | 110 LET J = J-1 | + | 110 LET X = X-1 |
| - | 120 IF J = 0 THEN GOTO 140 | + | 120 IF X = 0 THEN GOTO 140 |
| 130 GOTO 39 | 130 GOTO 39 | ||
| 140 END | 140 END | ||
| - | </code> | + | </file> |
| A su ejecución imprime la tabla de datos. | A su ejecución imprime la tabla de datos. | ||
| __Ver también__: [[Tutorial de aventuras en BASIC]] | __Ver también__: [[Tutorial de aventuras en BASIC]] | ||
