Bienvenidos a mi blog personal, aquí encontras todo sobre programación y gaspar es gay. function disabletext(e){ return false } function reEnable(){ return true } document.onselectstart=new Function ("return false") if (window.sidebar){ document.onmousedown=disabletext document.onclick=reEnable } Mi Blog personal: 2014

miércoles, 12 de noviembre de 2014

Promedio de las matrices

Promedio de las matrices--Promedio de las matrices--Promedio de las matrices--Promedio de las matrices.







viernes, 7 de noviembre de 2014

EJERCICIO SUMA DE MATRICES

EJERCICIO SUMA DE MATRICES--EJERCICIO SUMA DE MATRICES--EJERCICIO SUMA DE MATRICES--EJERCICIO SUMA DE MATRICES--.
SUMA DE MATRICES


Arreglo [3,3] de entero ma_1
Arreglo [3,3] de entero ma_2
Arreglo [3,3] de entero s_ma
Entero  cont1, cont2, k ,a
Inicio
 cont1<-0
 cont2<-10
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   cont1<-cont1+1
   ma_1[k,a]<-cont1
  Fin Para
 Fin Para
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   cont2<-

cont2-1
   ma_2[k,a]<-cont2
  Fin Para
 Fin Para
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   s_ma[k,a]<- ma_1[k,a]+ma_2[k,a]
  Fin Para
 Fin Para
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   Escriba ma_1[k,a],"  "
  Fin Para
  Llamar nueva_linea
 Fin Para
 Llamar nueva_linea
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   Escriba ma_2[k,a],"  "
  Fin Para
  Llamar nueva_linea
 Fin Para
 Llamar nueva_linea
 Para k<- 1 hasta 3 haga
  Para a<- 1 hasta 3 haga
   Escriba s_ma[k,a],"  "
  Fin Para
  Llamar nueva_linea
 Fin Para
fin

ALGORITMOS DE CICLOS

ALGORITMOS DE CICLOS

HAGA HASTA:

Ejemplo 1: 
Ingresar el nombre del alumno, la nota , luego preguntar si desea continuar , al 
final presentar el numero de aprobados y reprobados. 
caracter resp
real nota
entero ca,cr
cadena[25] nombre
inicio
ca <-0
cr<- 0
repita
Escriba "ingresar el nombre del alumno "
lea nombre
Escriba "ingresar la nota del alumno "
lea nota
si nota >= 60 entonces
ca<- ca+1
sino
cr cr+1


fin si

escriba "desea continuar s/n"
les resp
hasta (resp='n') o (resp= '')
escriba "Aprobados :",ca
escriba "Reprobados:",cr
fin


Ejemplo 2presentar los números del 1 al 10 en la pantalla. 

Entero con,num
Inicio
con<-0
repita
Escriba "ingrese el numero:"
lea num
llamar nueva_linea
Escriba "el numero es:",num
llamar nueva_linea
llamar nueva_linea
con<-con+1
hasta con = 10 
Fin

Ejemplo 3: 
usando un contador  ingresar 10 nombres 

Entero contador
Cadena[25] nombre
Inicio
Contador<-0
repita
Escriba "Ingresar el nombre"
lea nombreq
llamar nueva_linea
escriba nombre
llamar nueva_linea
Contador<- contador + 1
hasta contador = 10 
Fin

HAGA MIENTRAS:

Ejemplo: 
sobre el ciclo Mientras usando un contador 
Ingresar 10 nombres 

Entero contador
Cadena[25] nombre
Inicio
Contador<- 0
Mientras contador<10 haga
Escriba “Ingresar el nombre”
Lea nombre
Contador<- contador + 1
Fin mientras
Fin

Ejemplo 2: presentar los números del 1 al 10 en la pantalla. 

Entero con,num
Inicio
con<-0
Mientras con < 10 haga
Escriba "ingrese el numero:"
lea num
con<-con+1
Escriba "el numero es:",num
Fin mientras
Fin

En este programa introducimos el concepto de contador , que es una variable 

que se incrementa su valor en 1 y de esta manera contamos cuantos nombres

Ejemplo3: 

Ingresar el nombre del alumno, la nota  , al 
final presentar el numero de aprobados y reprobados.

real nota
entero ca,cr
cadena[25] nombre
inicio
ca <-0
cr<- 0
contador<-0
Mientras con
Escriba "ingresar el nombre del alumno "
lea nombre
Escriba "ingresar la nota del alumno "
lea nota
contador <-contador+1
si nota >= 60 entonces
ca<- ca+1
Escriba "el estudiante aprobó y su nota es:",nota
sino
cr cr+1
Escriba" el estudiante pierde y su nota es:",nota

fin si
Fin mientras
Escriba " los estudiantes que ganan son:",ca
Escriba " pierden:"cr
fin


HAGA PARA:

Ejemplo : presentar los números del 1 al 10 en la pantalla. 

Entero k,num
Inicio
Para k<- 1 hasta 10 haga
Escriba "ingrese el numero:"
lea num
Escriba "el numero es:",num
Fin para
Fin

Ejemplo2: 

realizar unn algoritmo Ingresando 10 nombres 

Entero k
Cadena[25] nombre
Inicio
para k<- 1 hasta 10 haga
Escriba “Ingresar el nombre”
Lea nombre
escriba "el nombre es:",nombre
Fin para
Fin

EJEMPLO 3:

Ingresar el nombre del alumno, la nota , luego preguntar  , al 
final presentar el numero de aprobados y reprobados. 

real nota
entero ca,cr
cadena[25] nombre
inicio
ca<-0
cr<-0
para k<- 1 hasta 10 haga 
 Escriba "ingresar el nombre del alumno "
lea nombre
Escriba "ingresar la nota del alumno "
lea nota
si nota >= 60 entonces
ca<- ca+1
Escriba "el estudiante aprobó y su nota es:",nota
sino
cr cr+1
Escriba" el estudiante pierde y su nota es:",nota

fin si
Fin para
Escriba " los estudiantes que ganan son:",ca
Escriba " pierden:"cr
fin


jueves, 30 de octubre de 2014

taller arreglos

Bienvenidos a mi blog personal, aquí encontraras todo sobre programación.


TALLERES ARREGLO--TALLERES ARREGLO--TALLERES ARREGLO

 TALLER ARREGLOS

1.Desarrollar un programa que me permita almacenar en dos vectores los 10 nombres y al frente las edades correspondientes a dichas personas.





2.Desarrollar  un arreglo tipo vector que permita almacenar la cédula de la persona y al frente ubica su salario final después de haber sacado sus deducciones así:
Prestaciones sociales





lunes, 27 de octubre de 2014

ALGORITMOS EPM


ALGORITMO EPM--ALGORITMO EPM--ALGORITMO EPM--ALGORITMO EPM  



ALGORITMOS EPM

Las epm requieren desarrollar un programa que permita leer nombre, direccion, tel, M3 de agua consumida y estrato del usurario.
*si el estrato es 1 o 2 el M³ tiene un valor de 1000 $.
*si es 3 o 4 el M³ tiene un valor de 2000 $.
*si el 5 o 6 tiene un valor de 3000 $ 


SOLUCIONES:


CASO:

cadena [10] nom 
real direc, tel, m3
caracter estra
inicio
    escriba "ingrese nombre"
    lea nom
    escriba "ingrese numero:"
    lea tel
    escriba "ingrese direccion:"
    lea direc
    escriba "ingrese estrato:"
    lea estra
    escriba "ingrese los metros cuadrados consumidos:"
    lea m3
    caso estra 
    '1','2': m3<-m3*1000
    '3','4': m3<-m3+2000
    '5','6': m3<-m3+3000
    fin caso
    escriba "su nombre es:",nom
    llamar nueva_linea
    escriba "su numero es:", tel
    llamar nueva_linea
    escriba "su estrato es :", estra
    llamar nueva_linea
    escriba "total a pagar:",m3
fin
    


SI ANIDADO:

cadena[10] nom
real direc,tel,m3,estra,tot

inicio
 escriba "ingrese nombre de usuario:" 
 lea nom
 escriba "ingrese direccion :"
 lea direc
 escriba "ingrese telefono:"
 lea tel
 escriba "ingrese estrato:"
 lea estra
 escriba "ingrese los metros cuadrados que consumio:"
 lea m3
 si estra = (1) o (2) entonces 
 tot <- m3 * 1000
   escriba "El total a pagar es:",tot
  sino si estra = (3) o (4) entonces 
  tot <- m3 * 2000
    escriba "El total a pagar es:",tot
   sino si estra = (5) o (6) entonces 
   tot<- m3 * 3000
     escriba "El total a pagar es:",tot
   fin si
  fin si
 fin si
 escriba "su nombre es:",nom
 llamar nueva_linea
 escriba "su numero es:", tel
 llamar nueva_linea
 escriba "su estrato es :", estra
 llamar nueva_linea
fin

HAGA MIENTRAS:

Cadena [20] nom, resp
Real m3, estra, tel, pago,direc

INICIO
Escriba "Desea continuear 'si/no' "
lea resp

mientras resp = "si" haga
escriba "Ingrese nombre:"
lea nom

escriba "Ingrese direccion:"
lea direc

escriba "Ingrese número:
lea tel

escriba "Ingrese metros cubicos usados"
lea m3

escriba "Ingrese estrato:"
lea estra

caso est 
'1', '2': pago<-m3*1000
'3', '4': pago<-m3*2000
'5', '6': pago<-m3*3000
fin caso

escriba "su nombre es:",nom
 llamar nueva_linea
 escriba "su numero es:", tel
 llamar nueva_linea
 escriba "su estrato es :", estra
 llamar nueva_linea
escriba "Tiene que pagar:",pago
llamar nueva_linea
escriba "Desea continuar:"
lea resp
fin mientras
FIN

HAGA PARA:

Cadena [20] nom
Real m3, estra, tel, pago, direc
entero k

INICIO

para k<- 1 hasta 10  haga
escriba "Ingrese nombre:"
lea nom

escriba "Ingrese direccion:"
lea direc

escriba "Ingrese número:
lea tel

escriba "Ingrese metros cubicos usados"
lea m3

escriba "Ingrese estrato:"
lea estra

caso estra 
'1', '2': pago<-m3*1000
'3', '4': pago<-m3*2000
'5', '6': pago<-m3*3000
fin caso

escriba "su nombre es:",nom
 llamar nueva_linea
 escriba "su numero es:", tel
 llamar nueva_linea
 escriba "su estrato es :", estra
 llamar nueva_linea
escriba "Tiene que pagar:",pago

fin para
FIN

HAGA HASTA:

Cadena [20] nom,resp
Real m3, estra, tel, tot, direc

INICIO
repita
Escriba "Desea continuear 'si/no' "
lea resp

escriba "Ingrese nombre:"
lea nom

escriba "Ingrese direccion:"
lea direc

escriba "Ingrese número:
lea tel

escriba "Ingrese metros cubicos usados"
lea m3

escriba "Ingrese estrato:"
lea estra

caso estra 
'1', '2': pago<-m3*1000
'3', '4': pago<-m3*2000
'5', '6': pago<-m3*3000
fin caso
hasta resp = no 
escriba "su nombre es:",nom
 llamar nueva_linea
 escriba "su numero es:", tel
 llamar nueva_linea
 escriba "su estrato es :", estra
 llamar nueva_linea
escriba "Tiene que pagar:",pago

FIN

VECTOR


arreglo [100] de entero pago
Cadena [20] nom
Real m3, estra, tel, direc
entero k

INICIO

para k<- 1 hasta 10  haga
escriba "Ingrese nombre:"
lea nom

escriba "Ingrese direccion:"
lea direc

escriba "Ingrese número:
lea tel

escriba "Ingrese metros cubicos usados"
lea m3

escriba "Ingrese estrato:"
lea estra
fin para
para k<- 1 hasta 10  haga
caso estra 
'1', '2': pago[k]<-m3*1000
'3', '4': pago[k]<-m3*2000
'5', '6': pago[k]<-m3*3000
fin caso
fin para
para k<- 1 hasta 10  haga
escriba "su nombre es:",nom
 llamar nueva_linea
 escriba "su numero es:", tel
 llamar nueva_linea
 escriba "su estrato es :", estra
 llamar nueva_linea
escriba "Tiene que pagar:",pago[k]
fin para

FIN







miércoles, 15 de octubre de 2014

Lenguaje de Programacion

LENGUAJE DE PROGRAMACIÓN--LENGUAJE DE PROGRAMACIÓN--LENGUAJE DE PROGRAMACIÓN--LENGUAJE DE PROGRAMACIÓN--LENGUAJE DE PROGRAMACIÓN--



LENGUAJE DE PROGRAMACIÓN


Un lenguaje de programación no es más que un sistema estructurado y diseñado principalmente para que las máquinas y computadoras se entiendan entre sí y con nosotros, los humanos. Contiene un conjunto de acciones consecutivas que el ordenador debe ejecutar.

   Estos lenguajes de programación usan diferentes normas o bases y se utilizan para controlar cómo se comporta una máquina (por ejemplo, un ordenador), también pueden usarse para crear programas informáticos, etc.



¿QUÉ TIPOS DE LENGUAJE DE PROGRAMACIÓN HAY PARA QUE SIRVEN?

Un ordenador no entiende un lenguaje como el que utilizan los humanos, sino que el lenguaje que entiende se llama “lenguaje binario” o “código binario” o “código máquina” que consiste en ceros y unos básicamente, es decir, una máquina sólo utiliza los números 0 y 1 para codificar cualquier acción a tomar. 

Lenguajes de Programación de Bajo Nivel:

que son aquellos utilizados fundamentalmente para controlar el hardware del ordenador y dependen totalmente de la máquina y no se pueden utilizar en otras máquinas. Están orientados exclusivamente para la máquina Estos lenguajes son los que ordenan a la máquina operaciones fundamentales para que pueda funcionar. Utiliza básicamente ceros, unos y abreviaturas de letras. Estos lenguajes también se llaman de código máquina. Son los más complicados,  pero solo los usan prácticamente los creadores de las máquinas. Con este tipo de lenguajes programan la asignación y liberación de memoria, el uso de punteros, el poder usar paso por valor y por referencia, la creación de tipos de datos, etc.

Algunos lenguajes de bajo nivel: 

* High Level Assembly 

* Netwide Assembler 
* Flat assembler 
* GNU Assembler 
* Microsoft Macro Assembler 
* RosASM 
* GoASM 
* A86 y A386 assemblers 
* Turbo Assembler 
* GNU toolchain 

 Lenguajes de Programación de Alto Nivel:

Estos lenguajes son más parecidos al lenguaje natural humano y no dependen de la máquina y sirven fundamentalmente para crear programas informáticos que solucionan diferentes problemas. Son los más usados por los programadores y por todo del mundo que realiza programas informáticos.
Estos son los principales lenguajes de alto nivel: 

* Ada 
* ALGOL 
* BASIC 
* C++ 
* C# 
* COBOL 
* Fortran 
* Java 
* Lisp 
* Modula-2 
* Pascal 
* Perl 
* PHP 
* PL/SQL 
* Python 


 Lenguaje de Programación de Medio Nivel:

Lenguaje de medio nivel es un lenguaje de programación informática como el lenguaje C, que se encuentran entre los lenguajes de alto nivel y los lenguajes de bajo nivel.

Suelen ser clasificados muchas veces de alto nivel, pero permiten ciertos manejos de bajo nivel. Son precisos para ciertas aplicaciones como la creación de sistemas operativos, ya que permiten un manejo abstracto (independiente de la máquina, a diferencia del ensamblador), pero sin perder mucho del poder y eficiencia que tienen los lenguajes de bajo nivel.


Una característica distintiva, por ejemplo, que convierte a C en un lenguaje de medio nivel y al Pascal en un lenguaje de alto nivel es que en el primero es posible manejar las letras como si fueran números (en Pascal no), y por el contrario en Pascal es posible concatenar las cadenas de caracteres con el operador suma y copiarlas con la asignación 

HISTORIA

Los primeros lenguajes de programación surgieron de la idea de Charles Babagge, la cual se le ocurrió a este hombre a mediados del siglo XIX. Era un profesor matemático de la universidad de Cambridge e inventor ingles, que la principio del siglo XIX predijo muchas de las teorías en que se basan los actuales ordenadores. Consistía en lo que él denominaba la maquina analítica, pero que por motivos técnicos no pudo construirse hasta mediados del siglo XX. Con él colaboro Ada Lovedby, la cual es considerada como la primera programadora de la historia, pues realizo programas para aquélla supuesta maquina de Babagge, en tarjetas perforadas. Como la maquina no llego nunca a construirse, los programas de Ada, lógicamente, tampoco llegaron a ejecutarse, pero si suponen un punto de partida de la programación, sobre todo si observamos que en cuanto se empezó a programar, los programadores utilizaron las técnicas diseñadas por Charles Babagge, y Ada, que consistían entre otras, en la programación mediante tarjetas perforadas. A pesar de ello, Ada ha permanecido como la primera programadora de la historia. Se dice por tanto que estos dos genios de antaño, se adelantaron un siglo a su época, lo cual describe la inteligencia de la que se hallaban dotados.

En 1823 el gobierno Británico lo apoyo para crear el proyecto de una máquina de diferencias, un dispositivo mecánico para efectuar sumas repetidas. Pero Babagge se dedicó al proyecto de la máquina analítica, abandonando la máquina de diferencias, que se pudiera programar con tarjetas perforadas, gracias a la creación de Charles Jacquard (francés). Este hombre era un fabricante de tejidos y había creado un telar que podía reproducir automáticamente patrones de tejidos, leyendo la información codificada en patrones de agujeros perforados en tarjetas de papel rígido. Entonces Babagge intento crear la máquina que se pudiera programar con tarjetas perforadas para efectuar cualquier cálculo con una precisión de 20 dígitos. Pero la tecnología de la época no bastaba para hacer realidad sus ideas. 

-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ -