|
Links
1.Antecedentes
2.Nacimiento y primeros años
3.Crecimiento explosivo
4.Madurez
5.El Lenguaje
a) sintaxis
b) Procedimiento y control de flujo
c) Tipos de Datos
6.Disponibilidad y variantes de Lenguaje
7.Ejemplos
a) Ejemplo
1: Simple Saludo
b)Ejemplo
2: BASIC original no estructurado (Applesoft BASIC)
c)Ejemplo
3: Equivalente en BASIC estructurado (Quick BASIC)
|
Ejemplos
Ejemplo 3
DEFINT I-N
iTrue=-1
INPUT "¿Cuál es su nombre"; NombreUsuario$
PRINT "Bievenido al 'asterisquero',"; NombreUsuario$
DO
PRINT
INPUT "¿Con cuántos asteriscos inicia [Cero sale]:"; NroAsteriscos
IF NroAsteriscos<=0 THEN EXIT DO
Asteriscos$ = ""
FOR I=1 TO NroAsteriscos
Asteriscos$=Asteriscos$ + "*"
NEXT I
PRINT "AQUI ESTAN: "; Asteriscos$
DO
INPUT "Desea más asteriscos:";SN$
LOOP UNTIL SN$<>""
IF SN$<>"S" AND SN$<>"s" THEN EXIT DO
INPUT "CUANTAS VECES DESEA REPETIRLOS [Cero sale]:";iVeces
IF iVeces<=0 THEN EXIT DO
FOR I = 1 TO iVeces
PRINT Asteriscos$;
NEXT I
PRINT
LOOP WHILE iTrue
END
|
