Mostrando entradas con la etiqueta Pseint. Mostrar todas las entradas
Mostrando entradas con la etiqueta Pseint. Mostrar todas las entradas

jueves, 19 de febrero de 2015

Ascii Art y animaciones en Pseint

ASCII ART

Es una tecnica de computación grafica para realizar graficos empleando los caracteres alfanumericos definidos por el codigo Ascii.
Pseint por tener un terminal de visualizacion solo en texto, puede emplear esta tecnica para mostrar graficos.
Aqui de pueden ver algunos ejemplos:

EDITORES Y GENERADORES DE GRAFICOS ASCII

Los editores y generadores son utiles para realizar estos graficos, algunos de ellos son

 ASCII ART EN PSEINT

En Pseint se debe tener en cuenta que la consola de visualizacion es de 80 de ancho por 25 de alto, asi que los graficos deben ser maximo de este tamaño
Para el curso de programacion la propouesta es la siguiente:

  • Realizar una secuencia de escenas que narren una historia o cuento.
  • La historia debe por lo menos tener amenos 10 escenas diferentes
  • La primer escena debe contar con el nombre del estudiante, código, grupo y titulo del cuento o historia.
  • Por lo menos dos de las escenas debe tener animaciones.
  • En caso de ser extensa la historia, se puede presentar por partes en diferentes pseudocódigos de Pseint.

 Tutoriales y videos pueden encontrase aqui:

martes, 2 de abril de 2013

Estructuras Condicionales en Pseint

Vídeos explicativos sobre estructuras condicionales.
Estos ejemplos son gracias la profesor Victor Viera Balanta.
Repaso de entrada proceso y salida.

El mayor entre dos números condicional simple

El mayor de dos números condicional doble (sino)

Determinación del mayor entre tres números.

lunes, 12 de noviembre de 2012

Ejemplo ciclos en PSEINT



Hacer un programa que muestre y cuente múltiplos de 3 hay entre 1 y 100.
  • Para la variable contadora tenemos que:  valor inicial  3, valor final 99, incremento 3
  • Para la variable acumuladora tenemos que:  valor inicial 0, ecuación s<-s+1
Proceso ExFi004
definir i,s Como Entero
i<-3;
s<-0;
Mientras i<=99 Hacer
Escribir "i= ",i;
s<-s+1;
i<-i+3;
FinMientras
Escribir "El numero de multiplos de 3 entre 1 y 100 es ",s;
FinProceso

Hacer un programa que calcule la suma de los numero impares comprendidos entre el 0 y el 100
  • Para la variable contadora tenemos que:  valor inicial  1, valor final 99, incremento 2
  • Para la variable acumuladora tenemos que:  valor inicial 0, ecuación s<-s+i
Proceso ExFi005
definir i,s Como Entero
i<-1;
s<-0;
Mientras i<=99 Hacer
s<-s+i;
i<-i+2;
FinMientras
Escribir "La suma de los impares entre 0 y 100 es ",s;
FinProceso

Hacer un programa que muestre y cuente los múltiplos de 5 que hay entre 1 y 500;
  • Para la variable contadora tenemos que:  valor inicial  5, valor final 500, incremento 5
  • Para la variable acumuladora tenemos que:  valor inicial 0, ecuación s<-s+1
Proceso ExFi006
definir i,s Como Entero
i<-5;
s<-0;
Mientras i<=500 Hacer
s<-s+1;
i<-i+5;
FinMientras
Escribir "La cantidad de multiplos entre 1 y 500 es ",s;
FinProceso

Hacer un programa que muestre, cuente y sume los múltiplos de 2 hasta un numero que se introduce por teclado.
  • Para la variable contadora tenemos que:  valor inicial  2, valor final el numero que se introduce por teclado, incremento 2
  • Para la variable acumuladora 1 tenemos que:  valor inicial 0, ecuación c<-c+1
  • Para la variable acumuladora 2 tenemos que:  valor inicial 0, ecuación s<-s+i
Proceso ExFi007
definir i,s,c,n Como Entero
i<-2;
s<-0;
c<-0;
Escribir "¿Hasta que valor desea hacer la sumatoria?";
Leer n;
Mientras i<=n Hacer
Escribir "Multiplo de 2 = ",i;
c<-c+1;
s<-s+i;
i<-i+2;
FinMientras
Escribir "La cantidad de multiplos entre 2 y ",n," es ",c;
Escribir "La sumatoria de multiplos entre 2 y ",n," es ",s;
FinProceso

Hacer un programa que muestre, cuente y sume los números que están separados por 8 posiciones desde un valor introducido por teclado hasta 500.
  • Para la variable contadora tenemos que:  valor inicial  el valor que se introduce por teclado, valor final 500, incremento 8
  • Para la variable acumuladora 1 tenemos que:  valor inicial 0, ecuación c<-c+1
  • Para la variable acumuladora 2 tenemos que:  valor inicial 0, ecuación s<-s+i
Proceso ExFi008
definir i,s,c,n Como Entero
s<-0;
c<-0;
Escribir "¿Desde que valor incia la sumatoria?";
Leer n;
i<-n;
Mientras i<=500 Hacer
Escribir "numero = ",i;
c<-c+1;
s<-s+i;
i<-i+8;
FinMientras
Escribir "La cantidad de numeros desde ",n,"hasta 500 es ",c;
Escribir "La sumatoria de numeros desde ",n,"hasta 500 es ",s;
FinProceso

Hacer un programa que calcule la suma del los cuadrados de los numeros pares entre el 0 y el 100 (en este ejemplo se considera el 0 como par)
  • Para la variable contadora tenemos que:  valor inicial  0, valor final 100, incremento 2
  • Para la variable acumuladora tenemos que:  valor inicial 0, ecuación s<-s+i^2
Proceso ExFi009
definir i,s Como Entero
s<-0;
i<-0;
Mientras i<=100 Hacer
s<-s+i^2;
i<-i+2;
FinMientras
Escribir "La suma de cuadrados de pares desde ",0," a 100 es ",s;
FinProceso


Hacer un programa que calcule la suma de los cuadrados de números que estén separados 4 posiciones, desde un valor introducido por teclado hasta 100 .
  • Para la variable contadora tenemos que:  valor inicial  valor que se introduce por teclado, valor final 100, incremento 4
  • Para la variable acumuladora tenemos que:  valor inicial 0, ecuación s<-s+i^2
Proceso ExFi010
definir i,s,n Como Entero
s<-0;
Escribir "¿Desde que valor incia la sumatoria?";
Leer n;
i<-n;
Mientras i<=100 Hacer
s<-s+i^2;
i<-i+4;
FinMientras
Escribir "La suma de cuadrados separados 4 desde ",n," a 100 es ",s;
FinProceso

jueves, 23 de agosto de 2012

Animación PSEINT Ejemplo5


Proceso animacionv05
    Definir i Como Entero;
    Definir j Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para j<-15 Hasta 1 Con Paso -1 Hacer
        Borrar Pantalla;
        Para i<-j Hasta 15 Con Paso 1 Hacer
            Escribir "     ";
        FinPara
        Para i<-1 Hasta 9 Con Paso 1 Hacer
            Escribir cohete[i];
        FinPara
        Esperar 1 Segundo;
    FinPara
FinProceso

Animación PSEINT Ejemplo4


Proceso animacionv04
    Definir i Como Entero;
    Definir j Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para j<-1 Hasta 15 Con Paso 1 Hacer
        Borrar Pantalla;
        Para i<-j Hasta 15 Con Paso 1 Hacer
            Escribir "     ";
        FinPara
        Para i<-1 Hasta 9 Con Paso 1 Hacer
            Escribir cohete[i];
        FinPara
        Esperar 1 Segundo;
    FinPara
FinProceso

Animación PSEINT Ejemplo3


Proceso animacion3
    Definir i Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para i<-1 Hasta 9 Con Paso 1 Hacer
        Escribir cohete[i],cohete[i],cohete[i],cohete[i],cohete[i];
    FinPara
FinProceso

Animación PSEINT Ejemplo2


Proceso animacion2
    Definir i Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para i<-1 Hasta 9 Con Paso 1 Hacer
        Escribir cohete[i];
    FinPara
FinProceso

Animacion PSEINT Ejemplo1



Proceso animacion
    Escribir "Presione una tecla para iniciar el lanzamiento!";
    Esperar Tecla;
    Borrar Pantalla;
    Escribir "         ";//1
    Escribir "         ";//2
    Escribir "         ";//3
    Escribir "         ";//4
    Escribir "         ";//5
    Escribir "         ";//6
    Escribir "         ";//7
    Escribir "         ";//8
    Escribir "         ";//9
    Escribir "         ";//10
    Escribir "         ";//11
    Escribir "   /|\   ";//12
    Escribir "   |B|   ";//13
    Escribir "   |O|   ";//14
    Escribir "   |M|   ";//15
    Escribir "   |B|   ";//16
    Escribir "  //|\\  ";//17
    Escribir " ******* ";//18
    Escribir "* * * * *";//19
    Escribir " * * * * ";//20
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;   
FinProceso

Animación en PSEINT con ASCII ART


Vídeo de ejemplo de una animación en PSEINT
 
En los siguientes enlaces se pueden descargar los dibujos en formato de caracteres, a estos dibujos se les llama ASCII Art.
  1. Galerias de imágenes
2. Editores

domingo, 22 de mayo de 2011

Ejemplo programa para encuesta en pseint

Este es un ejemplo para la realización de una encuesta para saber el grado de satisfacción de un producto.
El programa emplea el uso del ciclo para y condicionales.
este es el enlace de descarga
https://sites.google.com/site/camachomedia/home/archivos/menu02.psc?attredirects=0&d=1