lunes, 20 de mayo de 2013

El fin de tico

Hoy es el ultimo día de tico.. (Ohhhhhh)

Emos aprendido mucho, aunque nos ha costado trabajiyo...

Echaré de menos todos los momentos de agobio cuando no nos salían los ejercicios de programación, cuando se nos borraban las actividades que habíamos finalizado con mucho apuro y cuando no nos salían las cosas tras haber estado intentándolo durante varias clases...

Por fin esos agobios se van.. aunque seguramente lleguen otros peores.
Sin dudas estos momentos junto a mis compañeras serán inolvidables y, pese a la angustia vivida, este será uno de los mejores momentos vividos en mi vida.

Gracias a mis compañeras Ana, Patricia y Amor por aguantarme cada día y gracias tambien a ti Eva.


lunes, 6 de mayo de 2013

Ejemplos Pascal

Raíz cuadrada
 program raiz(input, output);
 uses wincrt;
 (*Obtener la raíz cuadrada de un número real x cualquiera.*)
 
 var x, y: real;
 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:1:2, ' es ', y:1:2);
   writeln; 
   writeln('** Fin **');
 end.
 
 
Este ejemplo trata de realizar una raíz cuadrada.Hay dos variables X e Y.
Acepta los números mayores de 0.
Realiza la raíz cuadrada del valor absoluto a los números para evitar raíces imaginarias.
El número resultante es el resultado.
 
 
Multiples
 program multi;
 
 {$APPTYPE CONSOLE}
 
 uses
   SysUtils;
 
 var  n,x:integer;
 
 begin
   x:=0;
   writeln('Entra un numero de la serie');
   readln(n);
   while n<>0 do
    begin
     if (n mod 3)=0 then
      begin
       x:=x+1;
       writeln('Dame otro numero');
       readln(n);
      end
     else
      begin
       writeln ('Dame otro numero');
       readln(n);
      end;
    end;
    writeln ('El numero de multiples de 3 es',x);
 end.
 
 
Este ejemplo trata de realizar una multiplicación. Hay dos variables N y X.
Se coge un número que sea menor o mayor que 0. Si el número es igual que 0 se le suma 1 para que sea múltiplo de 3.
El número resultante es el resultado (que es múltiplo de 3).


Exponenciación
 Program Exponeciacion;
 Uses
   Crt,Dos;
 Var
   a,b,c,i:Integer;
 Begin
   ClrScr;
   Write('Base: ');
   ReadLn(a);
   Write('Exponente: ');
   ReadLn(b);
   c:=1;
   For i:=1 To b Do
     Begin
     c:=c*a;
   End;
   WriteLn('');
   Write('Resultado: ',c);
   ReadKey;
 End.

 
Hay 4 variables: A, B, C e I.
Primero se escribe un número base al que vamos a poner el exponente.
Comprobamos que el exponente sea 1 y ejecutamos la acción.
El número que nos de es el resultado. 

lunes, 18 de marzo de 2013

aqui con mi comadre la ana.. (L)

Bueno, bueno.. pues por fin se acaba el segundo trimestre yupiiiiiii!!!!!!! aunque ahora toca apretar porque lo que nos queda de curso es bastante duroo.. =S menos mal que tengoo a mi anii quee mee hacee buenaa compañíaa y hace que las clases no sean tan burrridiiisimaaaassss!!!
Bueno, con respecto a tico, hemos acabado con las actividades de la base de datos y la verdad es que me han gustado bastante y creo que tienen bastante utilidad. También comenzaremos hoy a leer el temario del siguiente examen espero que sea ameno y fácil de entender.

Aver si logramos acabar este curso en condiciones y nos graduamos por fín!!!


viernes, 22 de febrero de 2013

WIRIS VS GEOGEBRA

Bueno bueno..
Pues hemos estado practicando con wiris y geogebra. Ambos programas sirven para resolver funciones, límites, etc etc etc... y ahora que ya sabemos como funcionan pues nos toca elegir entre uno u otro.


viernes, 15 de febrero de 2013

donde esta mi señoo!?? :(

Hoy Eva no ha estado con nosotros en clase.. nos ha avandonado por la gente de su tutoria.. nooo!!!! =(

Bueno hemos estado buscando definiciones durante tooda la horaaa y la verdad es que no me he enterado del significado de nadaa.. jajajaja

Espero que la semana que viene sea más divertidaa aunque se que  va a ser más extresantee..

lunes, 11 de febrero de 2013

yiuuupiii !!!

En estos momentos estamos trabajando con LibreOffice Calc. La verdades que me está gustando mucho y me está resultando más ameno que las actividades del tema anterior. Además sé que los conocimientos que tenga sobre este programa me serán muy útiles en la actualidad y en el futuro.

bieeennn!!!! =)

En estos momentos estamos trabajando con LibreOffice Calc. La verdades que me está gustando mucho y me está resultando más ameno que las actividades del tema anterior. Además sé que los conocimientos que tenga sobre este programa me serán muy útiles en la actualidad y en el futuro.

martes, 15 de enero de 2013

Hoy por fín dejamos de hace definitivamente las actividades de Libre Office para comenzar un tema nuevo. Como hoy ha sido el último día que hemos estado trabajando en las actividades hemos estado comprobando que todo estaba más o menos bien. No me ha dado tiempo a terminarlas todas por completo y la verdad es que algunas se me han hecho muy difíciles e incluso no las he podido realizar o completar. Pese a todo eso he aprendido muchas cosas que me serán muy útil en el presente y futuro. Esperemos que el tema siguiente sea tan ameno como este.