martes, 19 de octubre de 2010

Codigo fuente

1ª Lenguaje Maquina:

000000011010000101 A1
100010011001101089 9A
00111010100111003A 9C
011101000111000074 70
1110100100100000E9 20


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

3ª C:

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: 
    1. ¿Qué tipo de procesador tiene instalado el ordenador? ¿Cuál es su alias?                           Intel Pentium 4.2833 MHz  (21 x 135 ) 
    2. ¿Cuál es el nombre de la empresa que ha fabricado ese microprocesador?                        Intel Corporation  
    3. ¿Cuantos transistores incluye en su interior el microprocesador?                                             55 millones
    4. ¿A qué velocidad de reloj funciona el microprocesador?                                                   2800 MHz
    5. ¿Cuales son los tamaños de las memorias cachés L1 y L2?                                            Caché L1  8 KB   y Caché  L2  512 KB
    6. ¿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:
  1. ¿Cuál es el nombre de la placa base del ordenador?                                                            Gigabyte GA-8I845GVM-RZ/RZAC/RZC
  2. ¿Qué tamaño tiene la placa base? ¿Cuál es la forma de la placa base?                                          210 mm x  240 mm
  3. ¿Cual es el tipo de zócalo que tiene la placa base del ordenador?                                                   No sale
  4. ¿Cuál es el chipset de la placa base del ordenador? Nota: ¡no confundir con el chipset del bus!. i845GV 
  5. ¿Cuántos módulos de memoria RAM y de qué tipo soporta la placa base?                                       2 DDR DIMM
  6. ¿Qué ranuras o slots de expansión tiene la placa base y de qué tipo?                                            3PCI

4) Investiga en el apartado Placa base - memoria:
  1. ¿Que cantidad total de memoria tiene instalado el equipo?                                                             247 MB
  2. ¿Qué cantidad de memoria está usando ahora mismo el sistema?                                                   176 MB
  3. ¿Qué cantidad de memoria está disponible?                                                                                    71 MB

5) Investiga en el apartado Placa base - Chipset:
  1. ¿Cuántos módulos de memoria tiene instalados el ordenador?                                                  DRAM nº1 
  2. A la vista de la respuesta anterior y del punto 3.5, ¿cuántos slots quedan libres para instalar más memoria?                                                                                                                                  Queda uno
  3. ¿De qué tamaño son los modulos utilizados?                                                                                   256 MB
  4. ¿De qué tipo es la memoria utilizada?                                                                                                  ( PC2700 DDR SDRAM )
6) Investiga en el apartado Placa base - SPD:
  1. ¿Cuál es el nombre del fabricante de los módulos de memoria?                                                   Intel Corporation
7) Investiga en el apartado Comparaciones:
  1. ¿A qué velocidad en MB/s es capaz de leer datos el ordenador de la memoria RAM?                  2438 MB/s
  2. 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?
  3. ¿A qué velocidad en MB/s es capaz de escribir datos el ordenador de la memoria RAM?
  4. 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?

ejercico 12

                                                                      Mac Mini

ejercicio 11

                                                                   IBM PC de 1981

ejercicio 10

                                                                        IBM 360

ejercicio 9

                                                                       IBM 1620



ejercicio 8

Si ATLAS era 2400 veces más rápido que ENIAC, ¿cuanto tardaba en arrancar? Apunta la respuesta.

         tardará   0.24 Ghz

ejercicio 7

El padre de las computadoras


ejercicio 6













Computadora ENIAC