viernes, 29 de octubre de 2010
martes, 26 de octubre de 2010
lunes, 25 de octubre de 2010
martes, 19 de octubre de 2010
Codigo fuente
1ª Lenguaje Maquina:
2ª Ensamblador:
3ª C:
4ª Pascal:
Raíz cuadrada
5ªVisual Basic:
6ªDelphi:
7ª LISP:
Trabajando con listas
8ª PROLOG:
0000 | 0001 | 1010 | 0001 | 01 A1 |
1000 | 1001 | 1001 | 1010 | 89 9A |
0011 | 1010 | 1001 | 1100 | 3A 9C |
0111 | 0100 | 0111 | 0000 | 74 70 |
1110 | 1001 | 0010 | 0000 | E9 20 |
2ª Ensamblador:
; HOLA.ASM
; Programa clasico de ejemplo. Despliega una leyenda en pantalla.
STACK SEGMENT STACK ; Segmento de pila
DW 64 DUP (?) ; Define espacio en la pila
STACK ENDS
DATA SEGMENT ; Segmento de datos
SALUDO DB "Hola mundo!!",13,10,"$" ; Cadena
DATA ENDS
CODE SEGMENT ; Segmento de Codigo
ASSUME CS:CODE, DS:DATA, SS:STACK
INICIO: ; Punto de entrada al programa
MOV AX,DATA ; Pone direccion en AX
MOV DS,AX ; Pone la direccion en los registros
MOV DX,OFFSET SALUDO ; Obtiene direccion del mensaje
MOV AH,09H ; Funcion: Visualizar cadena
INT 21H ; Servicio: Funciones alto nivel DOS
MOV AH,4CH ; Funcion: Terminar
INT 21H
CODE ENDS
END INICIO ; Marca fin y define INICIO
int llamando_funcion() { int ret; ret = alguna_otra_funcion(); } int alguna_otra_funcion() { return 0; }
4ª Pascal:
Raíz cuadrada
program raiz(input, output); uses crt; (* Obtener la raíz cuadrada de un número real x cualquiera. *) var x, y: irreal; respuesta: string; begin writeln('** Calcular la raíz cuadrada de 12 **'); writeln('Entrar x (> 0): '); readln(x); y := sqrt(abs(x)); (* Raíz cuadrada del valor absoluto de x para evitar raíces imaginarias *) writeln; if (x<0) then (* Si x es negativo, el resultado se notifica como imaginario *) writeln('La raíz cuadrada de ', x, ' es el número imaginario ', y,'i') else writeln('La raíz cuadrada de ', x, ' es ', y); writeln; writeln('** Fin **'); end.
5ªVisual Basic:
Msgbox "Prueba de cuadro de mensaje de error.", vbCritical, "Titulo del mensaje"
6ªDelphi:
PertMetFile String Es la ruta del archivo .part.met completa. MetVersion Integer La versión del archivo .part.met. Normalmente es 224. Hash String El HASH con formato MD4 que identifica al archivo. FileType String Tipo de archivo (Vídeo, Audio, Imagen, etc) si es que se guardó su tipo en el .part.met. Format String Igual que FileType pero con el formato del archivo. Filename String Nombre del archivo que estamos descargando en el cliente y al que pertenece el part.met. PartName String Nombre del archivo .part en el que se escriben los datos descargados. Hases TStringList Si el archivo es grande, tendrá varios Hash. Esto devuelve un TStringList con los hashes en orden. Partials Integer Nº de hashes que contienen la propiedad Hases. NoTags Integer Nº de tags de los que se compone el archivo .part.met. Filesize Integer Tamaño del archivo que se está descargando. Transfered Integer Bytes que ya se han transferido. Status String Estado de la descarga (Pausado, Esperando) Priority String Prioridad de descarga (Alta, Normal o Baja)
7ª LISP:
Trabajando con listas
******************************************************************* Definición de la función: (defun vacia (l) (cond ((null l) 1) ; si la lista esta vacia devuelve 1 (t 0))) ; en otro caso (lista llena) devuelve 0 Llamada a la función: (vacia '(1 3 4)) ; La lista no esta vacia, devolvería 0 (vacia '()) ; La lista esta vacia, devolvería 1 ******************************************************************* (defun último (lista) (cond ((null (cdr lista)) (car lista)) (t (último (cdr lista))))) (último '(1 2 3 4 5 6 7)) ; devuelve el último de la lista: 7 ******************************************************************* ; ---FACTORIAL---- ;Definición matemática ; Factorial(x) = 1 si x=0 caso base ; x*factorial(x-1) si x>0 caso recursivo ;Función factorial hecha con recursividad no final (defun factorial (n) (if (= 0 n) 1 ; caso base (* n (factorial (- n 1))))) ; caso recursivo (factorial 4) ;esto nos devolvería 24=4*3*2*1 *******************************************************************
8ª PROLOG:
';' (A,_) :- A. ';' (_,B) :- B.
viernes, 15 de octubre de 2010
Algoritmo
Patatas fritas
- Sacar las patatas del frutero.
- Pelar las patatas.
- Poner las patatas peladas en una fuente.
- Tirar las cascaras de las patatas a la basura.
- Cojer un cuchillo.
- Picar las patas en rodajitas finas.
- Lavar las patatas picadas.
- Dejarlas sobre la mesa.
- Cojer un sarten.
- Poner el sarten en la cocina.
- Cojer el mechero del cajón.
- Encender la cocina con el mechero.
- Cojer el aceite de la mesa.
- Abrir el aceite.
- Echar abundante aceite hasta la mitad del sarten.
- Cojer las patatas de la mesa.
- Echar despacio las patatas en le sarten.
- Esperar aque se doren un poquito.
- Sacar las patas del sarten cuidadosamente.
- Poner la patatas en un plato.
- Cojer la sal.
- Abrir el bote de sal.
- Cojer con una cuchara un poquito de sal.
- Echar despacio sobre las patas esparciendo la sal.
jueves, 7 de octubre de 2010
Ejercicios- Harware
1) Investiga en el apartado Placa base - Procesador:
- ¿Qué tipo de procesador tiene instalado el ordenador? ¿Cuál es su alias? Intel Pentium 4.2833 MHz (21 x 135 )
- ¿Cuál es el nombre de la empresa que ha fabricado ese microprocesador? Intel Corporation
- ¿Cuantos transistores incluye en su interior el microprocesador? 55 millones
- ¿A qué velocidad de reloj funciona el microprocesador? 2800 MHz
- ¿Cuales son los tamaños de las memorias cachés L1 y L2? Caché L1 8 KB y Caché L2 512 KB
- ¿Cuál es el tamaño del microprocesador? 3.50 cm x 3.50 cm
2) ¿A qué velocidad se comunica la CPU con el resto de dispositivos a través del FSB (Front-side Bus)? Nota: debes multiplicar por 4 el valor que encuentres en el programa. Esta información está bajo el epígrafe Ordenador - Overclock.
A 540.0 MHz
3) Investiga en el apartado Placa base - Placa base:
- ¿Cuál es el nombre de la placa base del ordenador? Gigabyte GA-8I845GVM-RZ/RZAC/RZC
- ¿Qué tamaño tiene la placa base? ¿Cuál es la forma de la placa base? 210 mm x 240 mm
- ¿Cual es el tipo de zócalo que tiene la placa base del ordenador? No sale
- ¿Cuál es el chipset de la placa base del ordenador? Nota: ¡no confundir con el chipset del bus!. i845GV
- ¿Cuántos módulos de memoria RAM y de qué tipo soporta la placa base? 2 DDR DIMM
- ¿Qué ranuras o slots de expansión tiene la placa base y de qué tipo? 3PCI
4) Investiga en el apartado Placa base - memoria:
- ¿Que cantidad total de memoria tiene instalado el equipo? 247 MB
- ¿Qué cantidad de memoria está usando ahora mismo el sistema? 176 MB
- ¿Qué cantidad de memoria está disponible? 71 MB
- ¿Cuántos módulos de memoria tiene instalados el ordenador? DRAM nº1
- A la vista de la respuesta anterior y del punto 3.5, ¿cuántos slots quedan libres para instalar más memoria? Queda uno
- ¿De qué tamaño son los modulos utilizados? 256 MB
- ¿De qué tipo es la memoria utilizada? ( PC2700 DDR SDRAM )
6) Investiga en el apartado Placa base - SPD:
- ¿Cuál es el nombre del fabricante de los módulos de memoria? Intel Corporation
- ¿A qué velocidad en MB/s es capaz de leer datos el ordenador de la memoria RAM? 2438 MB/s
- En el ranking que muestra el programa de ordenadores actuales, ¿qué posición ocupa nuestro equipo teniendo en cuenta la velocidad de lectura de la memoria RAM?
- ¿A qué velocidad en MB/s es capaz de escribir datos el ordenador de la memoria RAM?
- En el ranking que muestra el programa de ordenadores actuales, ¿qué posición ocupa nuestro equipo teniendo en cuenta la velocidad de escritura de la memoria RAM?
ejercicio 8
Si ATLAS era 2400 veces más rápido que ENIAC, ¿cuanto tardaba en arrancar? Apunta la respuesta.
Suscribirse a:
Entradas (Atom)