Programación Informática

Teoría de Pseudocódigo

Ejemplos de Pseudocódigo

Ejemplos Generales de Código Estructurado en Programación

Ejemplos de código fuente

[editar]Ejemplo 1: ¡Hola Mundo!

   PRINT "¡Hola Mundo!"

[editar]Ejemplo 2: BASIC original no estructurado (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

[editar]Ejemplo 3: Equivalente en BASIC estructurado (Quick BASIC)

   DEFINT I-N        'Declara entera toda variable que comience con letras I a N
   iTrue = -1        'Flag en Verdadero
   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      'Salida
      INPUT "CUANTAS VECES DESEA REPETIRLOS [Cero sale]:";iVeces
      IF iVeces<=0 THEN EXIT DO    'Salida
      FOR I = 1 TO iVeces
         PRINT Asteriscos$;
      NEXT I
      PRINT
   LOOP WHILE iTrue
   END

[editar]