Tesis De Ingenieria - Upc

 
1.-Hacer un pseudocódigo que imprima los números del 1 al 100.
 
PROGRAMA contador1
ENTORNO:
   c <- 0
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS c < 101 HACER
      ESCRIBIR c
      c <- c + 1
   FINMIENTRAS
FINPROGRAMA
  
2.-Hacer un pseudocódigo que imprima los números del 100 al 0, en orden
decreciente.
 
PROGRAMA contador2
ENTORNO:
   c <- 100
ALGORITMO:   Borrar_pantalla( )
   MIENTRAS c <= 0 HACER
      ESCRIBIR c
      c <- c - 1
   FINMIENTRAS
FINPROGRAMA
 
 3.-Hacer un pseudocódigo que imprima los números pares entre 0 y 100.
 
PROGRAMA pares
ENTORNO:
   c <- 2
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS c < 101 HACER
      ESCRIBIR c
      c <- c + 2
   FINMIENTRAS
FINPROGRAMA
  
4.-Hacer un programa queimprima la suma de los 100 primeros números.
 
PROGRAMA suma
ENTORNO:
   c <- 1
   suma <- 0
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS c <= 100 HACER
      suma <- suma + c
      c <- c + 1
   FINMIENTRAS
   ESCRIBIR "La suma de los 100 primeros n£meros es: "
   ESCRIBIR suma
FINPROGRAMA
 
5.-Hacer un pseudocódigo que imprima los números impares hasta el 100 y queimprima cuantos impares hay.
 
PROGRAMA impares
ENTORNO:
   c <- 1
   son <- 0
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS c < 100
      ESCRIBIR c
      c <- c + 2
      son <- son + 1
   FINMIENTRAS
   ESCRIBIR "El número de impares: "
   ESCRIBIR son
FINPROGRAMA
  
6.-Hacer un pseudocódigo que imprima todos los números naturales que hay desde la unidad hasta unnumero que introducimos por teclado.
 
PROGRAMA natural
ENTORNO:
   i <- 0
   n <- 0
ALGORITMO:
   Borrar_pantalla( )
   ESCRIBIR "Introduce un número: "
   LEER n
   MIENTRAS i < n HACER
      i <- i + 1
      ESCRIBIR i
   FINMIENTRAS
FINPROGRAMA

7.-Introducir tantas frases como queramos y contarlas.
 
PROGRAMA frases
ENTORNO:
   res <- "S"
   frase <-Espacios( 30 )
   c <- 0
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS res = "S" HACER
      ESCRIBIR "Frase: "
      LEER frase
      c <- c + 1
      ESCRIBIR "Deseas introducir m s frases (S/N): "
      LEER res
   FINMIENTRAS
   ESCRIBIR "El número de frases introducidas son: "
   ESCRIBIR c
FINPROGRAMA

8.-Hacer un pseudocódigo que solo nos permita introducir S o N.
 PROGRAMA sn
ENTORNO:
   res <- " "
ALGORITMO:
   Borrar_pantalla( )
   MIENTRAS res <> "S" Y res <> "N" HACER
      ESCRIBIR "Introduce S o N"
      LEER res
      res <- Convertir_may£sculas( res )
   FINMIENTRAS
FINPROGRAMA
 
9.-Introducir un numero por teclado. Que nos diga si es positivo o negativo.
 
PROGRAMA signo
ENTORNO:
   num <- 0
ALGORITMO:
  Borrar_pantalla( )
   ESCRIBIR "Introduce un número: "
   LEER num
   SI num >= 0 ENTONCES
      ESCRIBIR "es positivo"
   SINO
      ESCRIBIR "es negativo"
   FINSI
FINPROGRAMA
 
10.-Introducir un numero por teclado. Que nos diga si es par o impar.
 
PROGRAMA paridad
ENTORNO:
   num <- 0
ALGORITMO:
   Borrar_pantalla( )
   ESCRIBIR "Introduce un número: "
   LEER num
   SI num =int( num / 2 ) * 2 ENTONCES
      ESCRIBIR "es par"
   SINO
      ESCRIBIR "es impar"
   FINSI
FINPROGRAMA
 
11.-Imprimir y contar los múltiplos de 3 desde la unidad hasta un numero que introducimos por teclado.
 
PROGRAMA multiplo3
ENTORNO:
   i <- 3
   n <- 0
   c <- 0
ALGORITMO:
   Borrar_pantalla( )
   ESCRIBIR "N£mero: "
   LEER n
   MIENTRAS i <= n HACER
     SI i = int( i / 3 ) * 3 ENTONCES
         ESCRIBIR i
         c <- c + 1
      FINSI
      i <- i + 1
   FINMIENTRAS
   ESCRIBIR "El número de múltiplos de 3 son: "
   ESCRIBIR c
FINPROGRAMA
 
12.-Hacer un pseudocódigo que imprima los números del 1 al 100. Que calcule la suma de todos los números pares por un lado, y por otro, la de todos los impares.
 
PROGRAMA par_impar...