miércoles, 12 de noviembre de 2014
viernes, 7 de noviembre de 2014
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 2: presentar 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
Entero k
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
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
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
con<-0
Mientras con < 10 haga
Escriba "ingrese el numero:"
lea num
con<-con+1
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
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
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
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
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
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
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 Y 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.
* 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 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.
-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ -
Suscribirse a:
Entradas (Atom)